Hallo,
ich habe mir in Excel eine Benutzerdefinierte Symbolleiste erstellt, genauer gesagt eine Comboliste. Wenn man sich einen Wert aussucht, soll dieser ausgesuchte Wert an einen Macro "Sub SQL(test As string)" übergeben werden.
...
Set myBar = CommandBars _
.Add(Name:="Liste", position:=msoBarTop, _
Temporary:=True)
myBar.Visible = True
Set newCombo = myBar.Controls _
.Add(Type:=msoControlComboBox)
With newCombo
.AddItem "var1"
.AddItem "var2"
.AddItem "var3"
.AddItem "var4"
.Style = msoComboNormal
.OnAction = "SQL"
End With
...
Leider erlaubt .OnAction scheinbar nicht die Angabe von Übergabe-Parametern.
Falls jemand eine Idee hat wie man das trotzdem hinbekommt, wäre ich sehr dankbar.
Gruß Howie