View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
FSt1 FSt1 is offline
external usenet poster
 
Posts: 3,942
Default help writing a macro please!

hi
Sub mcarter()
Dim r As Range
Dim rd As Range
Set r = Range("c1")
Do While Not IsEmpty(r)
Set rd = r.Offset(1, 0)
If r.Value = 0 Then
r.EntireRow.Hidden = True
End If
Set r = rd
Loop
MsgBox "done"
End Sub


"mcarter" wrote:

I need help writing a macro.
I have a worksheet of columns A - D, with 100 rows.
I need to hide the row if the value in column C is 0.
I can get the macro started in row 1 of column C by recording
a macro and selecting that cell, but from there I don't know
what to do. Thanks soooooo much!