如何使用VBA删除工作簿中每个工作表中的第一列

Question

我有一张10张以上的工作簿,我需要删除每张工作表中的第一列.
而不是手动执行此操作,我想知道是否有人知道可以为我执行此操作的短VBA宏？
谢谢!

Answer 1

您需要遍历所有工作表:

Sub qwerty()
    Dim ws As Worksheet
    For Each ws In Sheets
        ws.Cells(1, 1).EntireColumn.Delete
    Next ws
End Sub