1
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 1 year has passed since last update.

セルに新たに一行挿入する

Posted at
Sub InsertColumnBeforeE()
    Dim ws As Worksheet
    Set ws = ActiveSheet ' 現在アクティブなシートを設定、またはThisWorkbook.Worksheets("シート名")で特定のシートを指定
    
    ' E列の前に新しい列を挿入
    ws.Columns("E:E").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

1
0
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
1
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?