Befehlsschaltfläche einfügen
21.12.2005 14:14:47
Frank
Ich habe mir mittels Makro eine Pivottabelle in meine Arbeitsmappe einfügen lassen.
Nun möchte ich auf diesem Arbeitsblatt (Tabelle1) auch automatisch eine
Befehlsschaltfläche einfügen.
Das hatte ich aufgezeichnet:
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _
, DisplayAsIcon:=False, Left:=503.25, Top:=68.25, Width:=203.25, _
Height:=45).Select
Diese Schaltfläche soll auch sofort ein Befehl zugewiesen werden, nämlich
das Ansteuern einer Userform, also ungefähr so:
frm_start.show
Wie kriege ich das nun hin? Ich denke, dass müsste irgendwie mit with gehen, oder?
Wer kann mir helfen?
Gruß
Frank