No.1ベストアンサー
- 回答日時:
こんにちは。
Sub ShapesDelete()
Dim shp As Object 'As Shape
For Each shp In ActiveSheet.Shapes
If shp.Name = "図" Then
shp.Delete '削除
'shp.Visible = False '非表示
End If
Next shp
End Sub
簡単なマクロだと、上記のようなものになります。
私も、VBAを勉強し始めた段階で、オートシェイプに手を出したのですが、さっぱり分からなかったですね。なぜ、難しいかというと、記録マクロでは、オブジェクト名などが、正しく記録されないからです。常に、Selectionを対象とされるからです。
Wendy02さんへ・・
とっとってもうれしいです!!そしてわかりやすく書いていただいてるのでいがったです。なんとお礼を述べていいか・・。
本当にド素人なので質問して回答がかえってきてもよめなかったりするのではと心配していました。
VBAの勉強をあきらめずにもう少しがんばってみたいと思いました。
ありがとうございます!!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) ExcelのVBAコードについて教えてください。 1 2022/06/17 15:40
- Excel(エクセル) ExcelVBAで自動調整できますか? 3 2023/08/25 22:59
- Excel(エクセル) excelのオートシェイプを使って 1 2023/01/03 16:54
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/01/25 11:42
- その他(Microsoft Office) ExcelのVBAコードについて教えてください。 2 2022/06/17 12:58
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/03/25 17:03
- Excel(エクセル) Excelのマクロについて教えてください。 4 2022/05/31 14:07
- Excel(エクセル) Excelのvbaについて教えてください。 図形一つ一つに名前がついています。 指定した図形の名前を 2 2022/08/04 15:13
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/06/19 10:08
- Excel(エクセル) エクセル シート比較で書式を変えるを繰り返したい 2 2023/05/05 11:25
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
VBA Shapes コピーと名前
Excel(エクセル)
-
エクセルvbaでの図形のカット(コピー)ペーストについて
Excel(エクセル)
-
【VBA】3個の図形をコピーしてSheet2に貼り付けたい
Excel(エクセル)
-
-
4
特定の名前のオートシェイプの有無を知りたい(エクセルVBA)
Excel(エクセル)
-
5
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
-
6
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
7
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
8
【EXCEL VBA】オートシェイプをクリックした時にそのオートシェイプの名前を取得したい
Visual Basic(VBA)
-
9
Excel VBAのオートシェイプの名前の取得(?)
Visual Basic(VBA)
-
10
VBA 同じ名前のオブジェクトを選択したいのですが
Visual Basic(VBA)
-
11
マクロで選択した図形の選択状態を解除するには
Excel(エクセル)
-
12
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
13
エクセルVBAで画像を貼り付ける座標設定方法は?
PowerPoint(パワーポイント)
-
14
Excel VBAで、ユーザーフォームをモードレス表示している間、処理を止めるには?
Visual Basic(VBA)
-
15
VBA プロシージャの名前の取得
その他(Microsoft Office)
-
16
エクセルマクロで特定の範囲が空白という条件
Excel(エクセル)
-
17
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
18
エクセルVBAでフォームのListboxをスクロールするには?
その他(Microsoft Office)
-
19
Excel(VBA)
Excel(エクセル)
-
20
エクセルで別シートの同じ位置にオブジェクトをコピーしたい
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パワーポイントで作図した図を...
-
ばねの図を描きたい。
-
エクセル上で図のグループ化解...
-
貼り付けた図を編集するには
-
パワポで挿入画像を同じサイズ...
-
パワーポイントのスライドに図...
-
図とオブジェクトの違い(エク...
-
ワードの画像貼り付け時のいが...
-
テキストボックスを図で貼付け...
-
PDFの図及び文章等をエクセル、...
-
エクセルからワードへのフロー...
-
WORDで回路図
-
ホームページのリンクの貼り方
-
PowerpointでCtrlキーにて複数...
-
立体画像の塗りわけ
-
自作地図のワードへの貼り付け...
-
パワーポイント2003に関する質...
-
オートシェイブで入れた図(矢...
-
ワード2000でオブジェクト...
-
Excelのシートを図として認識さ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パワーポイントで作図した図を...
-
ばねの図を描きたい。
-
エクセル上で図のグループ化解...
-
WORDで回路図
-
パワーポイントのスライドに図...
-
パワポで挿入画像を同じサイズ...
-
エクセルからワードへのフロー...
-
貼り付けた図を編集するには
-
パワーポイントのスライドをワ...
-
オートシェイブで入れた図(矢...
-
テキストボックスを図で貼付け...
-
図とオブジェクトの違い(エク...
-
PowerpointでCtrlキーにて複数...
-
ワード2016です。図が透明...
-
回路図をwordにきれいに貼り付...
-
エクセルでの オートシェイプ...
-
【マクロ】図をクリックした位...
-
Wordの「図形描画」。線を消す...
-
ワードの画像貼り付け時のいが...
-
Word上に貼り付けたExcelの表の...
おすすめ情報