Excel에서 기존 시트의 첫 번째 행을 삭제하는 매크로

Question

첫 번째 행을 제거해야하는 약 300 매의 Excel 파일이 있습니다. VBA 코드를 제안 해 주시겠습니까? 사전에

감사합니다!

Answer 1

당신이 시도한 것을 올리십시오. 코드 아래

는 현재 통합 문서의 각 sheets` 루프 :에 대한

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