Mein Problem liegt in der Initialisierung des Feldes. Die Online-Hilfe gibt hierzu leider nicht viel her.
Wie muss der Initialisierungscode / bzw. der Befehl für ein ComboBox1 aussehen?
Mein Problem liegt in der Initialisierung des Feldes. Die Online-Hilfe gibt hierzu leider nicht viel her.
Wie muss der Initialisierungscode / bzw. der Befehl für ein ComboBox1 aussehen?
Versuch's mal so ... Private Sub Worksheet_Activate() Sub Makro1() Sub Makro2() Sub Makro3()
Option Explicit
Code eingefügt mit Syntaxhighlighter 1.14
Private Sub ComboBox1_Click()
Select Case ComboBox1.ListIndex + 1
Case 1: Makro1
Case 2: Makro2
Case 3: Makro3
End Select
End Sub
With ComboBox1
.Clear
.AddItem "Eintrag 1"
.AddItem "Eintrag 2"
.AddItem "Eintrag 3"
End With
End Sub
MsgBox "Message 1"
End Sub
MsgBox "Message 2"
End Sub
MsgBox "Message 3"
End Sub
Gruß
Thomas
------------------------------
Internet: Homepage
eMail: Thomas.Risi@t-online.de
------------------------------