Terminating autofilter removes commandbuttons (xl2000, not in xl2003)

[Rob]

Hello,

in an sheet I created fot a client I applied an automated autofilter that
checks for some things. The client uses Excel 2000. I developed the system
in 2003. Everything works fine in 2000 but one thing is curious.

The three commandbuttons that start the VBA application are erased when the
autofilter is terminated with this code:

ActiveSheet.AutoFilterMode = False

When I end the procedure just before this command and I activate the command
manually when it is in a prcedure like

sub StopFilter
ActiveSheet.AutoFilterMode = False
end sub

The filter is terminated and my buttons are still there.

When I enter a breakpoint (red dot and red line) and I step (f8) through the
code on executing

ActiveSheet.AutoFilterMode = False

a runtime error is generated (it's in Dutch and difficult to translate, but
it will be something like "can't activate the step-modus or breakpoint
modus") and if I klick the 'continue' button the commandbuttons are deleted
once again.

The whole thing works fine in 2003 though!

There is no protection in the code or on the sheet and no
out-of-the-ordinary code is used.

Strange?

Rob

 

[Dave Peterson]

I use xl2003 and the arrows were gone when I used:

sub StopFilter
ActiveSheet.AutoFilterMode = False
end sub

Maybe you could use something like:

With ActiveSheet
If .FilterMode Then
.ShowAllData
End If
End With

 

[Rob]

Hello Dave,

unfortunately that didn't help. Indeed, it shows all date but I still need
to stop the autofilter and with doing that all commandbuttons are deleted...

Any other suggestions?


Rob

 

[Dave Peterson]

What does "stop the autofilter" mean?

Remove the arrows or show all the data?

If it's the first, then use your code.

If it's the second, then how did my suggestion fail?