JimS
09-07-2009, 03:14 PM
Can the following code be modified to not delete the Header Row (Row 1)?
This code clears the entire worksheet (Timeline Data worksheet) if there is data on it, but if it's blank (except for the Header Row 1) it will delete Row 1. I do not want it to every delete Row 1.
Thanks...
JimS
Sub Macro12()
With ThisWorkbook.Worksheets("Timeline Data")
x = .UsedRange.Rows.Count
.Rows("2:" & x).Delete
End With
End Sub
This code clears the entire worksheet (Timeline Data worksheet) if there is data on it, but if it's blank (except for the Header Row 1) it will delete Row 1. I do not want it to every delete Row 1.
Thanks...
JimS
Sub Macro12()
With ThisWorkbook.Worksheets("Timeline Data")
x = .UsedRange.Rows.Count
.Rows("2:" & x).Delete
End With
End Sub