エクセルVBA 結合されたセルの内容を消去させる方法

こんにちは、いつもお世話になっています。
結合されたセルの入力内容を消去したいです。（書式などはそのまま）

現在
Range("A9").ClearContents
となっているのですが、実行してみると
「実行エラー1004　結合されたセルの一部を変更することはできません」

と出てしまいます。
何かいい方法はあるでしょうか。

No.2 ベストアンサー 回答者： misatoanna 回答日時： 2005/05/26 14:33

Range("A9").MergeArea.ClearContents

の１行だけでもよいですね。
このほうがベターでしょう。

この回答へのお礼

ありがとうございます、問題なく動きました！

お礼日時：2005/05/26 14:51

No.4 回答者： Wendy02 回答日時： 2005/05/26 14:54

実際で使用する場合は、こんな風にすればよいでしょうね。

Sub myTest()
　With Range("G3")
　 If .MergeCells Then
　　　 .MergeArea.ClearContents
　 Else
　　　.ClearContents
　 End If
　End With
End Sub

No.3 回答者： ctrlzr 回答日時： 2005/05/26 14:33

結合セルの先頭を指定してクリアはだめなんですね。

私も知りませんでした^^;
でもこれでできました♪
Range("A9").value = null

この回答へのお礼

ありがとうございます、本当に助かりました。

お礼日時：2005/05/26 14:52

No.1 回答者： misatoanna 回答日時： 2005/05/26 14:28

Range("A9").Select

Selection.ClearContents

ではいかがでしょうか。