删除 Excel 中所有现有工作表中第一行的宏

Question

我有一个包含大约 300 页的 excel 文件，我需要删除其中的第一行。你能推荐 VBA 代码吗？

提前致谢！

Answer 1

至少尝试 post 你已经尝试过的东西。

下面的代码将删除活动工作簿中所有工作表中的第一个

Sub LoopThroughSheets()
    Dim ws As Worksheet
    For Each ws In ActiveWorkbook.Worksheets

     ws.Range("1:1").Delete

    Next ws
End Sub

Answer 2

Private Sub deleteRows()

    Dim ws As Worksheet

    For Each ws In ThisWorkbook.Sheets
        ws.Range("A1").EntireRow.Delete
    Next ws

End Sub

删除 Excel 中所有现有工作表中第一行的宏

Macro to delete the first rows in all existing sheets in Excel

excel

vba