Excel VBA マクロ:指定カラムが空の行を削除する


Sub removeBalkLines()
' 1行目にダミー行を追加(ヘッダー行を消されないよう)
Rows("1:1").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
'AutoFilterでA1セルが空白な行のみ選択
Cells.Select
Selection.AutoFilter
ActiveSheet.Range("A1").AutoFilter Field:=1, Criteria1:="="
'対象行を全て削除
Selection.Delete Shift:=xlUp
' A1セルに選択を戻しておく
Range("A1").Select
End Sub
↓ 参考になるブログがたくさんあります!ぜひどうぞ! ↓
にほんブログ村 その他日記ブログ 日々のできごとへ

スポンサーリンク