View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default Terminating autofilter removes commandbuttons (xl2000, not inxl2003)

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 wrote:

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