覚え書き

範囲内のデータをクリアします。

  Sheets("すべて").Activate
  Range("A4:TL46").ClearContents

結構大切。