エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
シート上のオートシェイプをすべて非表示にしたい
こんばんは。 >ActiveSheet.Shapes.Visible = False Shapes というのは、Shapes というオブジェクトで... こんばんは。 >ActiveSheet.Shapes.Visible = False Shapes というのは、Shapes というオブジェクトで、Visible プロパティを持っていません。以下のように、それぞれのオートシェイプをピックアップして、ループで非表示にしていきます。 Sub AutoShapesInvisible() '全てのオートシェイプを非表示にするマクロ Dim shp As Shape For Each shp In ActiveSheet.Shapes If shp.Type = msoAutoShape Then shp.Visible = msoFalse End If Next End Sub