Excel VBAでシート上にある画像や図形(オートシェイプ)を表示したり、非表示にする記録です。
画像を回転さえるには「Visible」プロパティを使います。
< スポンサーリンク >
例
画像や図形を表示します。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
With shp
.Visible = True
End With
End Sub
画像や図形を非表示にします。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
With shp
.Visible = False
End With
End Sub
Withステートメントを使わない場合
ActiveSheet.Shapes(1).Visible = True
こんな記事も書いています