入力済みセルの値を消去することがあり、1個1個手作業で空白にするのが面倒だと思ったことはありませんか?
Excel-VBAのコマンドボタンを押すことにより、指定した複数セルの値が一瞬で一括消去されて空白にするClearContentsを使った方法をご紹介します。
ClearContents
ClearContentsを使うには、データ消去したいセル番号を書いてからClearContentsで挟んであげます。
表示中のシート上でセル1か所のデータ消去
Private Sub CommandButton1_Click()
Range(“A1”).ClearContents
End Sub
- コマンドボタン1がクリックされたら
- セルA1の値を消去する
- マクロ記録終了
この場合シート名が指示されていないので、開いているシート上でないと、全く違うシートのセルAP3の値が消去されてしまうのでご注意を!
シート名を指定してセル1か所のデータ消去
Private Sub CommandButton1_Click()
Sheets(“HOME”).Range(“A1”).ClearContents
End Sub
- コマンドボタン1がクリックされたら
- シート名「HOME」のセルA1の値を消去する
- マクロ記録終了
どのシートを表示中でも、シート名を指定しているので確実に消去することができるので、トラブルを防ぐためにもシート名を加えておく方が大事ですよ。
2か所のセルのデータ消去
Private Sub CommandButton1_Click()
Sheets(“HOME”).Range(“A1,B1”).ClearContents
End Sub
- コマンドボタン1がクリックされたら
- シート名「HOME」のセルA1とB1の値を消去する
- マクロ記録終了
セル番号の間に「,」を付けるだけで、複数セルをまとめて消去することができます。
セルの範囲を指定してデータ消去
Private Sub CommandButton1_Click()
Sheets(“HOME”).Range(“A1:B2”).ClearContents
End Sub
- コマンドボタン1がクリックされたら
- シート名「HOME」のセルA1~B2の範囲のセルの値を消去する
- マクロ記録終了
セル番号の間に「:」を付けるだけで、セルの範囲をまとめて消去することができます。
.ClearContentsを使ってデータを一度クリアしてから、作業をするほうが間違えやエラーが無くなるので、必須のVBAコードですね。
関連記事
-
セルの操作
エクセルVBAで複数セルを一括で結合・解除を繰り返し処理する方法
エクセルの表を印刷するには見栄えの為にセルの結合を行ったら、並べ替えをするとエラーになって困ったことありませんか? Mergeメソッドを書き加えれば、自動的にセル… -
セルの操作
複数のセルの値を別のセルにコピーする
VLOOKUPでは数式の値は検索不能? ボウリングのリーグ戦の成績表をエクセルで作っていて、リーグ戦では一般的に初回はレーン抽選によって対戦相手が決まり、2週目以降は… -
セルの操作
エクセルVBAで指定した範囲の複数セルの値を一括クリアする方法
入力済みセルの値を消去することがあり、1個1個手作業で空白にするのが面倒だと思ったことはありませんか? Excel-VBAのコマンドボタンを押すことにより、指定した複数… -
セルの操作
エクセルVBAでリストの中から不要な行や列を非表示にする方法
小さなお店ではスタッフのシフト表をエクセルで管理している事が多いと思いますが、時間別出勤リストを表示させるときにお休みの人は非表示にして見やすくしたいと思い… -
テキストボックス
複数のテキストボックスの値を一括で複数のセルの値に書き換える方法
セルA1~A10の値をまとめてテキストボックス1~10に転記する ボウリング場のリーグ戦の成績表でも使っているエクセルで、リーグ戦のルールなどを設定するユーザーフォ… -
セルの操作
入力済み最終行を見つけて追記・削除する方法
エクセルVBAのユーザーフォームで一発検索する ボウリング場のリーグ戦成績表でも使っているエクセル。 エクセルには参加者のスコアーなど様々なデータを入力しますが、… -
セルの操作
エクセルで苗字と名前2つのセルの値をくっつける(セルの値の結合)
CSVファイルなどを取り込んだ時に、苗字と名前が別々のセルに分かれていることが多いと思いますが、1つのセルに結合して表示したいと思ったことありませんか? 例えば…
紅葉スポット
-
中禅寺湖湖畔の紅葉散策へ奥日光の大定番紅葉観光スポットへ
中禅寺湖観光の中禅寺温泉バスターミナルから華厳の滝や中禅寺湖畔散策へ紅葉を楽しみに訪れる方も多く、紅葉見頃になるといろは坂からの大渋滞に巻き込まれ1時間以上、… -
秩父のパワースポット三峯神社の金蔵落としへ大血川渓谷紅葉へ
秩父市大滝にある大血川渓谷は「金蔵落し」の周りを中心にかえでやもみじが真っ赤に染まり、バス停から近い事もあり多くの観光客が訪れます。 そして金蔵落しは紅葉絶景… -
復元された平家の里へ平清盛像や茅葺屋根と水の郷で温泉と紅葉コラボ
【紅葉見頃】10月中旬~11月中旬 日光市の北部で鬼怒川温泉のさらに奥地にある湯西川温泉には平家落人伝説があり、秘話・伝説などが現代に伝える役目を果たすために「… -
三国峠猿ヶ京温泉の赤谷湖畔水鏡紅葉と江戸時代の関所跡見学へ
国道17号で三国峠を目指す途中にある温泉街の猿ヶ京には、関所と相俣ダムによってできた赤谷湖が観光スポットになっています。 そして紅葉になると周囲の三国連山が綺麗… -
日本庭園「松雲山荘」へ柏崎駅から徒歩圏内の大正時代からの紅葉名所
紅葉見頃 10月下旬~11月下旬 約3,000本つつじやもみじなどで大正時代に作られた日本庭園で、柏崎ガス創設者の飯塚謙三氏から柏崎市に移譲され無料で庭園内を散策でき… -
紅葉の寸又峡コバルトブルーの夢の吊橋へ滞在時間2時間
サンドウィッチマンとゲストがバスで旅するバスサンドの放送を見て、ビックリするほど綺麗なコバルトブルーの湖にかかる吊り橋がとても気になったので、夏に青春18きっ…