Sub InsertColumnBeforeE()
Dim ws As Worksheet
Set ws = ActiveSheet ' 現在アクティブなシートを設定、またはThisWorkbook.Worksheets("シート名")で特定のシートを指定
' E列の前に新しい列を挿入
ws.Columns("E:E").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
More than 1 year has passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme