I have the following code to delete all rows from where "Notes" appears in Col A on Sheet Data Import up to last row containing data in Col B
It would be appreciated if someone could kindly amend my code
I am unsure how to locate last row in Col b containing Data
It would be appreciated if someone could kindly amend my code
I am unsure how to locate last row in Col b containing Data
Code:
Sub Delete_Rows_fromNotes()
Set rStartCell = .Cells.Find(What:="NOTES", LookAt:=xlWhole)
If Not rStartCell Is Nothing Then
Set rEndCell = .Cells.Find("???", LookAt:=xlWhole)
If Not rEndCell Is Nothing Then
Set rEndCell = rEndCell.Offset(iEXTRA_ROWS, 0)
Range(rStartCell, rEndCell).EntireRow.Delete
End If
End If
End With
End Sub