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

質問

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

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

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

回答No.2

misatoanna · ベストアンサー

Range("A9").MergeArea.ClearContents
の１行だけでもよいですね。
このほうがベターでしょう。

お礼

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

回答No.4

Wendy02

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

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

回答No.3

ctrlzr

結合セルの先頭を指定してクリアはだめなんですね。私も知りませんでした^^;
でもこれでできました♪
Range("A9").value = null

お礼

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

回答No.1

misatoanna

Range("A9").Select
Selection.ClearContents

ではいかがでしょうか。