ワークシート上にある任意の複数の図形を選択する場合、VBAではどのように記述すればよいのでしょうか。
ワークシート上の図形には、生成された時点でそれぞれ名前が勝手に付けられますので、選択したい図形の名前を選択するのが一番近道になります。
ワークシート上の複数の図形を選択する方法
ワークシート上にひし形が3つあります。
このうちのひし形1とひし形3を選択してみます。
Sub 画像を複数選択()
ActiveSheet.Shapes.Range(Array("ひし形 1", "ひし形 3")).Select
End Sub
複数の図形を選択するためのポイントは、
- 配列を使って図形を指定する。
- 選択したい図形の名前を指定する。
ということです。
選択したい画像が2つ以上あれば、配列にその分記述すればよいことになります。
Array(“図形の名前”,”図形の名前”,・・・)
選択したい図形の名前の調べ方は、ワークシート上でその図形をクリックすると、左上のウインドウに名前が表示されます。
ちなみに、画像の名前を指定する際に注意が必要なのは、
「ひし形 1」という名前には、「ひし形」と「1」の間に「スペース」が入ることです。
※ もちろん、自分で図形の名前を付けた場合には、スペースを気にする必要はありません。
コメント