VBA 列を削除
'1列目から4列目を削除する(列A:列D) 'アクティブなシートの1〜3列目を削除後、左方向にシフト Sub DeleteColumn() Worksheets(1).Activate 'コード途中で改行するときはアンダーバーいれる Worksheets(1).Range(Cells(1, 1), Cells(1, 4)) _ .EntireColumn.Delete End Sub
'1列目から4列目を削除する(列A:列D) 'アクティブなシートの1〜3列目を削除後、左方向にシフト Sub DeleteColumn() Worksheets(1).Activate 'コード途中で改行するときはアンダーバーいれる Worksheets(1).Range(Cells(1, 1), Cells(1, 4)) _ .EntireColumn.Delete End Sub