visible

Excel VBAでシート上にある画像や図形(オートシェイプ)を表示したり、非表示にする記録です。

画像を回転さえるには「Visible」プロパティを使います。

< スポンサーリンク >





画像や図形を表示します。

Sub test()
    Dim shp As Shape
    Set shp = ActiveSheet.Shapes(1)

    With shp
        .Visible = True
    End With
End Sub

visible
visible

 

画像や図形を非表示にします。

Sub test()
    Dim shp As Shape
    Set shp = ActiveSheet.Shapes(1)

    With shp
        .Visible = False
    End With
End Sub

visible
visible

 

Withステートメントを使わない場合

ActiveSheet.Shapes(1).Visible = True

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします