EXCEL中怎样通过VB让表格中图片显示和隐藏?
展开全部
Sub YinCang()
Dim p
For Each p In thisworkbook.worksheets("sheet1").Pictures
p.Visible = False
Next
End Sub
Sub xianshi()
Dim p
For Each p In thisworkbook.worksheets("sheet1").Pictures
p.Visible = true
Next
End Sub
Dim p
For Each p In thisworkbook.worksheets("sheet1").Pictures
p.Visible = False
Next
End Sub
Sub xianshi()
Dim p
For Each p In thisworkbook.worksheets("sheet1").Pictures
p.Visible = true
Next
End Sub
追问
如果只隐藏picture1这张图片,代码该如何改动?
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询