• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel2007VBA セル範囲の選択について)

Excel2007VBA セル範囲の選択について

このQ&Aのポイント
  • Excel2007VBAでセル範囲を選択する方法について質問です。
  • 最終行でデータ入力がされているセルを取得し、他のセルと組み合わせて範囲を選択する方法を教えてください。
  • 現金出納帳を作成していて、収支項目と収支金額の範囲を指定しているのですが、最終行が毎月変動するため、自動的に最終行を取得して範囲を選択する方法を知りたいです。

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

  • ベストアンサー
  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.3

一例です。 Range("A3:E" & Range("E" & Rows.Count).End(xlUp).Row).ClearContents

dradra33
質問者

お礼

mu2011様 ご回答ありがとうございました。 上記のコードをそのまま使わせていただきました ところ("A3:E50")と同じように削除できました。

その他の回答 (2)

  • o_chi_chi
  • ベストアンサー率45% (131/287)
回答No.2

下記でどうですか。 (ダブルクォートで囲ってしまうとすべて文字列として扱われてしまします。) --- Range("A3:E" & Range("A1").End(xlDown).Offset(0, 4).Row).Select

dradra33
質問者

お礼

o_chi_chi様 ご回答ありがとうございます。 今回の質問においてダブルクォートで囲んではいけないことが 分かりましたありがとうございました。

  • mt2008
  • ベストアンサー率52% (885/1701)
回答No.1

とりあえずこんな感じでいかがでしょう。 2行目で、使用しているセルの最終行を求めています。 A:E列以外の使用しているセルも含めた最終行ですが、使用上問題無いでしょう。 With ActiveSheet   nLast = .UsedRange.Rows(.UsedRange.Rows.Count).Row   .Range(.Cells(3, 1), .Cells(nLast, 5)).ClearContents End With

dradra33
質問者

お礼

mt2008様 ご回答ありがとうございます。 実際には別の方のご回答にある コードを使わせていただきましたが、 mt2008様のコードも今後の参考に させていただきます

関連するQ&A