図を選択する: ChartObjects.Select

アクティブなシートの図を選択するには、ChartObjects.Selectプロパティを指定します。ここで、図は"fig01"という名前ということにします。

Sub test()   ActiveSheet.ChartObjects("fig01").Select End Sub

ワークシート名、グラフ名をそれぞれ別の変数に格納しておくと、大きいプログラムを作るときの自由度、視認性が格段にあがります。ただ上のような1行のプログラムを書くのと比べるとちょっと長くなってしまいますが。。。

Sub test()   Dim ws As Worksheet                      'ワークシート型変数の定義   Dim fig As ChartObject                    'ChartObject型変数の定義   Set ws = Worksheets("sheet1")         'ワークシート名を指定   Set fig = ws.ChartObjects("fig01")   'グラフを指定   fig.Select                                            'グラフを選択 End Sub