View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Scossa Scossa is offline
external usenet poster
 
Posts: 26
Default I need help with this Subroutine!!!!

In article ,
says...
What I am trying to do is as follows:
When I change the value in cell E3 or E79, I want all the rows between
("B5:B77") and ("B81:B153") that do not have the same values as in cell E3 or
E79 to be hidden. Right now I am getting an error on this line:
If Not rngAll Is Nothing Then rngAll.EntireRow.Hidden = True


Try to change the position of .enableEvents:

If Target.Address = "$E$3" Or Target.Address = "$E$79" Then

Application.EnableEvents = False
Me.Range("E3").Value = Target.Value
Me.Range("E79").Value = Target.Value

instead of:

If Target.Address = "$E$3" Or Target.Address = "$E$79" Then

Me.Range("E3").Value = Target.Value
Me.Range("E79").Value = Target.Value
Application.EnableEvents = False


Just my two cents.

--
Bye!
Scossa