散布図の削除

表示した散布図を切り取りではなく削除するコードはないのでしょうか。
あればコード例をご教示お願いします。
手動では削除は見つかりません。
但し、条件はコードの最初の処理で行うことで、誰かが
残した散布図を削除することです。

エクセルのブックを開く
シート２に掲載されている散布図を削除する。

簡単なようですが意外とわかりません。お願いします。

No.1 回答者： wisemac21 回答日時： 2008/08/24 15:45

グラフなどのオブジェクトの削除は、通常オブジェクトを選択してDeleteキーを押すと削除できます。

メニューからのコマンドはありません。

この回答へのお礼

VBAのコード化に関する質問でした。すみません。

お礼日時：2008/08/25 00:00

No.2 ベストアンサー 回答者： xls88 回答日時： 2008/08/24 16:15

下記のようなマクロで、アクティブシート上にある散布図のグラフ名が取得できます。

Msgboxのところを、グラフ削除のコードに変えれば、散布図削除マクロになります。
ただし散布図の種類は、xlXYScatter以外にもあります。
必要なら、それらにも対応するように工夫しなければなりません。

Sub test1()
　　Dim myCht As ChartObject

　　For Each myCht In ActiveSheet.ChartObjects
　　　　If myCht.Chart.ChartType = xlXYScatter Then
　　　　　　MsgBox myCht.Name
　　　　End If
　　Next
End Sub

この回答へのお礼

ありがとうございました。おかげさまで削除できました。
感謝します。

お礼日時：2008/08/25 00:02