Need Macro to Auto hide rows

**cmwood** · 01-23-2013, 11:48 PM

Hello,

I am trying to write a macro that will hide the row that "Complete" is selected in. So in column "M" cells there is a drop down that has the options Complete, Not Complete and Follow-up. I want the row that is completed to hide when "Complete" is chosen. Everything I have done has failed. I am using excel 2010.

Thanks for your help, I need it.

**cmwood** · 01-24-2013, 12:06 AM

I tired this but when I hit run, its acting like I don

Private Sub Worksheet_Change(ByVal Target As Range)

   Dim myrange As Range
  Set myrange = Range("M:M")
   For Each cell In myrange
   If cell <> "" Then
   If cell.Value = "Complete" Then
    cell.EntireRow.Hidden = True
    End If
    End If
    Next cell

End Sub

**cmwood** · 01-24-2013, 12:11 AM

This seems to work but I have to run it for it to hide the completed. It doesn't do it in real time

Sub Macro1()
   
   Dim myrange As Range
  Set myrange = Range("M:M")
   For Each cell In myrange
   If cell <> "" Then
   If cell.Value = "Complete" Then
    cell.EntireRow.Hidden = True
    End If
    End If
    Next cell

End Sub

**Patnaik** · 01-24-2013, 12:50 AM

@cmwood

Hi

Try to put the code in the Sheet which sheet you want to run the above code and also your first code also working

Private Sub Worksheet_Change(ByVal Target As Range)
Call Macro1
End Sub

Hope it clear

Thanks

SP

**arlu1201** · 01-24-2013, 12:26 AM

CMWood,

Welcome to the forum.

I have added code tags to your post. As per forum rule 3, you need to use them whenever you put any code in your post. Please add them in future. If you need more information on how to use them, check my signature below this post.

**arlu1201** · 01-24-2013, 10:47 AM

Try this code

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 13 Then
    If Target.Value = "Complete" Then
        Target.EntireRow.Hidden = True
    End If
End If
End Sub