• ベストアンサー

【EXCEL2010/クリアボタンを設置する】

クリアボタンを設置し、ボタンを押すと 例えばA1とB1に入力された文字がクリアされるようにしたいです。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.3

続けてお邪魔します。 No.2の補足に関して・・・ >結合セルが多数ある場合はどのような式になりますか? >("B2,L5,G10")と入力してもエラーになります。 ClearContentsを使う場合は結合セルの最後のセルまで指定しないとダメのようなので 手っ取り早く Range("B2,L5,G10") = "" としてみてはどうでしょうか? ※ 厳密にいえば "" は長さ0の文字列を代入する!という意味になりますので、 ClearContents と若干意味が違うかもしれません。 Range("B2,L5,G10") = Empty とした方が正解なのかもしれませんが、 その辺は結果オーライでごめんなさい。m(_ _)m

その他の回答 (2)

  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.2

No.1です。 >B2:G3までのセルを結合し、”エリア”と名前をつけた場合 セルを結合なおかつ、名前定義しているというコトですね? 結合セル番地が判っているのであれば >Range("B2").MergeArea.ClearContents 敢えて名前定義を使用する場合、無理やりやれば >Range("エリア") = Null といった感じでしょうかね!m(_ _)m

Yamamon1983
質問者

補足

ありがとうございます! 初歩的な質問させていただきます。 結合セルが多数ある場合はどのような式になりますか? ("B2,L5,G10")と入力してもエラーになります。

  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.1

こんばんは! ごくごく簡単に・・・ 一例です。 「開発」タブ → 挿入 → ActiveXコントロールを選択 → コマンドボタンを挿入 → 挿入したコマンドボタン上でダブルクリック → ↓のコードの2行目だけを入力 Private Sub CommandButton1_Click() Range("A1:B1").ClearContents End Sub として、デザインモードを終了してください。 以上で完了です。 ※ フォームコントロールのボタンでもコードは一緒です。m(_ _)m

Yamamon1983
質問者

補足

ありがとうございます。 例えばなのですが、結合されたセルの場合はどのようになるのでしょうか? B2:G3までのセルを結合し、”エリア”と名前をつけた場合はどのようになるのでしょうか? よろしくお願いいたします。

関連するQ&A