VBA 列全体をコピペ()
Sub 列全体をコピペ()
'アクティブシートの列コピペ&列削除
With ActiveSheet
'列コピペ
.Columns("O:O").Copy Columns("E:E")
'列削除
.Columns("F:O").Delete
End With
End Sub
Sub 列全体をコピペ()
'アクティブシートの列コピペ&列削除
With ActiveSheet
'列コピペ
.Columns("O:O").Copy Columns("E:E")
'列削除
.Columns("F:O").Delete
End With
End Sub