ワークシート上の複数の図形を選択する方法

エクセルVBA VBA



ワークシート上にある任意の複数の図形を選択する場合、VBAではどのように記述すればよいのでしょうか。
ワークシート上の図形には、生成された時点でそれぞれ名前が勝手に付けられますので、選択したい図形の名前を選択するのが一番近道になります。



ワークシート上の複数の図形を選択する方法

ワークシート上にひし形が3つあります。
このうちのひし形1とひし形3を選択してみます。

Sub 画像を複数選択()

   ActiveSheet.Shapes.Range(Array("ひし形 1", "ひし形 3")).Select

End Sub

複数の図形を選択するためのポイントは、

  • 配列を使って図形を指定する。
  • 選択したい図形の名前を指定する。

ということです。
選択したい画像が2つ以上あれば、配列にその分記述すればよいことになります。
Array(“図形の名前”,”図形の名前”,・・・)
選択したい図形の名前の調べ方は、ワークシート上でその図形をクリックすると、左上のウインドウに名前が表示されます。
ちなみに、画像の名前を指定する際に注意が必要なのは、
「ひし形 1」という名前には、「ひし形」と「1」の間に「スペース」が入ることです。
※ もちろん、自分で図形の名前を付けた場合には、スペースを気にする必要はありません。

コメント

タイトルとURLをコピーしました