#1   Report Post  
dd
 
Posts: n/a
Default delete rows

i would like to run a macro that does the following.
start at row 2
if L2 and m2 and n2 are all zeros then delete row
if not then go to next row and do the same check.

the macro should end once the "L" field is blank.

let me know if more info is need

thanks

--


  #2   Report Post  
Bill Manville
 
Posts: n/a
Default

Dd wrote:
i would like to run a macro that does the following.
start at row 2


It's easier to start at the end and work back.

Sub DeleteRows()
Dim lRow as Long
lRow = ActiveSheet.UsedRange.SpecialCells(xlLastCell).Row
Do Until lRow = 1
If Cells(lRow, "L")=0 And Cells(lRow, "M")=0 And Cells(lRow, "N")=0
Then
Rows(lRow).Delete
End If
lRow = lRow-1
Loop
End Sub

An alternative would be to use AutoFilter and delete all the visible
rows.

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Multiple rows of data on a single axis (charting) ramseysgirl Charts and Charting in Excel 8 December 29th 04 07:00 PM
Delete Chart agac8103 Charts and Charting in Excel 3 December 13th 04 05:54 AM


All times are GMT +1. The time now is 03:57 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"