Excel VBA 質問スレ Part66

[0475 デフォルトの名無しさん 2020/06/02(火) 19:31:05.26 ID:0+iVbcJA]

Sub 列挿入()
ActiveSheet.Copy

Dim i As Long
For i = 32 To 8 Step -1
Columns(i).Insert
Next

End Sub
ここまでは何とか、、ってとこです。
後は指定したの行を全部何とか
2列1行のセルに
道のりが遠すぎる…