dynam. CommandButton oder ?
11.09.2007 20:54:48
KViertel
mein Problem ist zur Zeit Folgendes. Ich benutze ein Unserform als Steueroberfläche für eine Anwendung, in der aus einem Datenbestand je nach Wunsch Pivottabellen mit Grafiken oder druckbare Berichte erstellt werden.
Die druckbaren Berichte werden im Hintergrund aufbereitet und ausgegeben. Die Pivottabellen sollen aber angezeigt werden, um evtl. die Auswahl verändern zu können. Aus VBA werden die PivotTabellen erstellt.
Jetzt suche ich nach einer Lösung wie ich dann wieder zum Userform zurückkehren kann.
Der Versuch bei Aufruf ein Symbol in die Standartleiste einzuhängen funktioniert. Ich habe aber ein Problem diesen Menuepunkt wieder zu löschen.
Sub MenueLoeschen()
On Error Resume Next
Application.CommandBars("Worksheet Menu Bar").Controls("zurück zum Hauptmenue").Delete
End Sub
Im Einzelschritt wird die Funktion angesprungen, jede Zeile auch angezeigt, aber tun tut sich nichts.
Ich muss das Symbol fast immer händig löschen (manchmal funktionierts). Der Name ist aus der Menue.Add-Anweisung kopiert.
Ein anderer Weg wäre in jede Pivottabelle einen Button einzufügen. Dazu muss ich leider sagen, _
dass ich die gefundenen Beispiele der Recherche aber nicht richtig umsetzen konnte weil ich sie nicht ganz durchschaue. Es wäre ein Button einzufügen der dann die "Sub Userform_anzeigen" ausführt.
Kann mir jemand helfen oder einen anderen Lösungsweg beschreiben?
MfG. Klaus