ComboBox oder Ähnliches als PopUp Fenster
10.01.2019 13:05:44
Stefan
mit dem u.a. Skript erstelle ich ja eine einfache ComboBox mit Auswahlmöglichkeiten.
Dazu muss ich aber einen Platz auf einem Registerblatt haben/definieren.
Gibt es so ein Auswahlfeld auch als PopUp Fenster, welches sich nach Auswahl auch automtisch schließt?
Ähnlich einer Messagebox...
Option Explicit
Private Sub Workbook_Open()
With Worksheets("Tabelle1").OLEObjects.Add(ClassType:="Forms.ComboBox.1", _
Left:=50, Top:=50, Width:=90, Height:=25).Object
.AddItem "a"
.AddItem "b"
End With
End Sub
Anzeige