View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Marcia Marcia is offline
external usenet poster
 
Posts: 15
Default delete data rows in excel by using a macro?

I have never created macros. Can you give me the step by step. Not sure
where to start

"Tom Ogilvy" wrote:

Sub DeleteRows()
Dim rng as Range
With columns(3)
Do
set rng = .Find(What:="ABC", _
After:=ActiveCell, _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
if not rng is nothing then
rng.EntireRow.Delete
else
exit do
End if
Loop
end Sub

--
Regards,
Tom Ogilvy

"Marcia" wrote:

I need a macro to delete rows in a 1,000+ page excel report that are
identified by data in a specific column.