2種類以上のオートシェープ選択し、グループ化した後に、そのグループ化した図形のオブジェクト名を取得したいです。私の取得の流れです。
(1)すでにグループ化前の図形は複数選択されている。
(2)グループ化後には、グループ図として選択されたままになっているはず。
(3)下記でオブジェクト名が取得できるはず。
Selection.ShapeRange.Name
ですが、グループ化処理後に、自動的に選択が図形からはずされてしまい、エラーとなってしまいます。
エクセルシート上に他にもグループ化された図形が複数あるため、今対象にしているグループ化した直後の図形のオブジェクト名をどう取得すればよいかがわからないでいます。知りたいのはあくまで、今グループ化したそのオブジェクト名になります。
No.2ベストアンサー
- 回答日時:
sub macro1()
selection.group.select
msgbox selection.name
end sub
のようで良いでしょう。
グループ化すると選択が解除される事を見越して
sub macro2()
dim o
on error resume next
set o = selection.group
msgbox o.name
end sub
のようにしても構いません。
No.1
- 回答日時:
図形をグループ化した時点ではグループ1とかグループ2とかの番号が順番で付きますが、名前ボックスでお望みの名前を入力してEnterすれば別の名前に変更できますね。
マクロの記録で試験したところでは、そのような操作は例えば次のように記録されています。
Selection.ShapeRange.Group.Select
Selection.ShapeRange.Name = "ketugou"
Selection.Name = "ketugou"
名前ボックスでの修正を行わなければ
Selection.ShapeRange.Group.Select
のままでグループ1とかの名前の取得はされていませんね。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excel VBAのことでお聞きしたいことがあり、ご教授お願いします。 下記の3つの図形があり、この 3 2022/08/08 17:57
- Illustrator(イラストレーター) ワード。グラデーションがうまく行かない。 2 2022/09/28 19:56
- Illustrator(イラストレーター) Illustrator アンカーポイント選択について 3 2023/01/30 12:31
- JavaScript console.logがどうしても2つ機能しないのでアドバイスをくださいお願いします 2 2022/07/07 22:13
- Excel(エクセル) Excelのvbaについて教えてください。 図形一つ一つに名前がついています。 指定した図形の名前を 2 2022/08/04 15:13
- Word(ワード) ワード 2003。表とテキストボックスや図をグループ化出来ませんか? 2 2022/04/17 15:06
- PDF Word→pdfに変換する際,図形部分に画像が上書きされる 1 2023/02/01 12:49
- Excel(エクセル) テキストの背後にあるオブジェクトとは 3 2023/01/03 20:22
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Excel(エクセル) 指定した条件でTRANSPOSE関数を使う 5 2023/08/18 19:45
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
Excel VBAのオートシェイプの名前の取得(?)
Visual Basic(VBA)
-
【EXCEL VBA】オートシェイプをクリックした時にそのオートシェイプの名前を取得したい
Visual Basic(VBA)
-
EXECLマクロでshapeがグルーフ゜化されてるかどうかを調べる方法は?
Visual Basic(VBA)
-
-
4
エクセルVBAでオートシェープのRectangleの選択
Excel(エクセル)
-
5
VBA Shapes コピーと名前
Excel(エクセル)
-
6
エクセルvbaでの図形のカット(コピー)ペーストについて
Excel(エクセル)
-
7
VBAでオブジェクトが選択されているかどうかを判定する方法
Excel(エクセル)
-
8
マウスで選択した図形のみVBAで移動したい。
Visual Basic(VBA)
-
9
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
10
PowerPointVBAでスライドマスター上での編集
PowerPoint(パワーポイント)
-
11
マクロで選択した図形の選択状態を解除するには
Excel(エクセル)
-
12
エクセルVBAで画像を貼り付ける座標設定方法は?
PowerPoint(パワーポイント)
-
13
Excel VBA インデックスの境界について
Excel(エクセル)
-
14
エクセルで、オブジェクトの選択を禁止する方法。
Excel(エクセル)
-
15
特定の名前のオートシェイプの有無を知りたい(エクセルVBA)
Excel(エクセル)
-
16
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
-
17
【Excel VBA】マクロでExcel自体を終了させたい
Excel(エクセル)
-
18
EXCEL/VBA 変数の値をクリップボードにコピーする方法
Visual Basic(VBA)
-
19
マクロを実行すると画像がズレてしまいます
その他(Microsoft Office)
-
20
エクセルVBA 図形の選択法は?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Googleからの以下のメールにつ...
-
LINEの既読数がおかしいです(´...
-
EXCEL/グループ数を数え...
-
町内会回覧板が戻って来ない・・・
-
Beckyでアドレス帳のグループへ...
-
Excelで指定した条件で時間を自...
-
小学校の運動会の短距離走、走...
-
パート始めてから、欠勤の連絡...
-
VBA 図形グループ化後オブジェ...
-
Outlookのアドレス帳のグループ...
-
パートの新人さん。私はパート...
-
女子グループ特有の「圧」って...
-
Google フォト は、なぜ反転で...
-
最近、左利きYouTuberさん多い...
-
Android用のメールをフォルダや...
-
CCのまま返信したい
-
Y!モバイルメールについて
-
Googleでメールを見ていたので...
-
「Mail」下書きの編集方法について
-
Notesのメールのローカルへの保...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Googleからの以下のメールにつ...
-
Outlookのアドレス帳のグループ...
-
町内会回覧板が戻って来ない・・・
-
LINEの既読数がおかしいです(´...
-
Beckyでアドレス帳のグループへ...
-
重複しないグループ分けについて
-
EXCEL/グループ数を数え...
-
エクセル:グループ機能について
-
はてなブログのグループのバナ...
-
googleグループに招待されまし...
-
パート始めてから、欠勤の連絡...
-
スマホはアンドロイドです。SMS...
-
パートの新人さん。私はパート...
-
IP Messengerでグループ名を作...
-
Excelで指定した条件で時間を自...
-
エクセルVBAである”記号”を含ん...
-
VBA 図形グループ化後オブジェ...
-
自分でLINEのグループ作ったら...
-
EXCELで連続した同じ値をグルー...
-
outlookのグループアドレスのメ...
おすすめ情報