Erkennen, welche Symbolleistenschaltfl. aktiviert

[W_Doemland_cb7ada]

Hallo,

Eine selbstdefinierte Symbolleiste enthalte 5 Schaltflächen, mit denen (für 5 Sachgebiete).d i e s e l b e Userform geladen wird. Abhängig von der aktivierten Schaltfläche sollen die Textboxen, Listboxen pp der Userform mit jeweils verschiedenen Additems geladen werden. Wie wird die Wenn-Abfrage "Wenn „Schaltfläche1“ der Symbolleiste „Test“ aktiviert ist, fülle die txtbox1 mit den Additems a bis f, nachdem zu zuvor mit txtbox1.clear geleert worden ist. geschrieben?

Danke und Gruß

[Sculpture_49eed4]

Hallo Wilhelm,

jeder Button hat eine .Key-Eigenschaft, die Du in den Eigenschaften der Toolbar setzen und anschließend in der ButtonClick-Prozedur der Toolbar abfragen kannst, etwa:

Sub ToolBar1_ButtonClick(ByVal Button As MSComCtlLib.Button)
Select Case Button.Key
Case „Schaltfläche1“
…
Case „Schaltfläche2“
…
End Select

Gruß

Sculpture