シート内のデータを消去する

プチ情報になりますが…シート内のデータを消去する設定は以下の通り．

【用法】
Sheets("100").Select
Cells.Select
Selection.Delete Shift:=xlUp
Cells(1, 1).Select

【解説】
上記のようにすると、
①シート名100を選択
②シート内の全セルを選択
③全部のデータを削除
④セル1，1を選択する

以上、簡単ですがコピペで簡単に使えるようにしておくのもよいかと思いまして書いてみました。