Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Looping through a Collection

Sub DeleteRow1()     Dim myWorksheet As Worksheet     For Each myWorksheet In ActiveWorkbook.Worksheets         myWorksheet.Rows(1).delete     Next myWorksheet End Sub