Help with VBA AdvancedFilter

[sidel801]

There's a code I found online that does almost exactly what I was hoping for, that is, automatically filter an entire row when a cell (E7 in my example) value changes. The problem I'm having is whenever something changes in the worksheet, it triggers the macro. Is there any way to limit the trigger so it only happens (i.e., filters) when I change the value of that particular cell rather than any change in the worksheet? See below....

Thanks in advance for any help you can provide!

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Columns.Count < Me.Columns.Count Then Range("e10:e80").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _ ("e6:e7"), Unique:=False End If End Sub

 

[Osvaldo Palmeiro]

Please, try if this could work there.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$E$7" And Target.Columns.Count < Me.Columns.Count Then
  Range("E10:E80").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("E6:&7"), Unique:=False
 End If
End Sub

 

[sidel801]

Please, try if this could work there.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$E$7" And Target.Columns.Count < Me.Columns.Count Then
  Range("E10:E80").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("E6:&7"), Unique:=False
 End If
End Sub

 

[sidel801]

No unfortunately! The filtering doesn't seem to be working now. I was hoping to use XL2BB to upload something, but I can't seem to open the excel add-in...sorry.