Hi:

Ho do I delete a row that strats for ex: with "node...

This is not working, unless I am putting in the code the
hole sentence:

If ActiveCell.Value.left = "Node *"
ActiveCell.EntireRow.Delete
ActiveCell.Offset(-1, 0).Select
End If
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.ClearContents
Range("A1").Select
Application.ScreenUpdating = TrueIf
ActiveCell.Value.left = "Node *" then

Thanks,

Dan