http://www.mvps.org/dmcritchie/excel/install.htm

--


Regards,


Peo Sjoblom

"Marie" wrote in message
...
Susan,
Sorry for the bad manners, but I'm new to this group and was unaware I was
being rude. Thanks so much for your very quick reply. However, my
situation
is this. I have a 800 page spreadsheet, I need to delete certain rows. I
need to delete rows where in Columns J through M equals zero. Also, can
you
please tell me where to write this formula/macro. I am unfamiliar with
this
aspect of Excel. Again, I am forever grateful for you help.

"Susan" wrote:

Option Explicit

Sub Koz()

Dim myLastRow As Long
Dim r As Long
Dim c As Range

myLastRow = ActiveSheet.Cells(10000, 1).End(xlUp).Row

For r = myLastRow To 1 Step -1
Set c = ActiveSheet.Range("a" & r)
If c.Value = 0 Then
c.EntireRow.Delete
End If
Next r

End Sub
==================
this is a macro - you can't do what you want with formulas without
having a helper column and either auto filtering or manually deleting
rows yourself. in this macro, if column A is zero, the entire row
will be deleted.
next time don't put the whole question in the header..... it's
considered bad manners. if this macro doesn't do what you want, post
back with details & i can amend it.
hope this helps
:)
susan



On Jul 29, 2:15 pm, Koz wrote: