エクセル上でマクロのログを残す場合など、指定行以下を全て削除したい要望があります。
指定行=ヘッダー行でその部分まで消されるととても面倒です。
ヘッダー行以下のデータ行を全て削除するコピペコード
'■指定行以下のデータ行を全てClearContents Public Function Call_iniDataClearContents(sRow As Long, ws As Worksheet) ws.Rows(sRow & ":" & ws.Cells.Rows.Count).ClearContents End Function
実際の使い方
Public Sub sample() Call Call_iniDataClearContents(2, ActiveSheet) End Sub
コメント