versuche es mal wieder bei Euch, da ich ein Problem habe!
Ich habe in meinem Worksheet eine ComboBox erstellt! Darüber habe ich mit der Steuerelement-Toolbox ein Bildfläche eingefügt, welche dann bei der Auswahl der eingetragenen Namen der ComboBox, das jeweilige Bild eintragen soll!
Mein Programm so far:
Option Explicit
Private Sub UserForm_Initialize()
ComboBox1.AddItem "Erde1"
ComboBox1.AddItem "Erde2"
End Sub
Private Sub ComboBox1_Click()
Sheets("Protokoll").Activate
If ComboBox1 = "Erde1" Then
Image1.Picture = LoadPicture("Erde1.gif")
End If
If ComboBox1 = "Erde2" Then
Image1.Picture = LoadPicture("Erde2.gif")
End If
End Sub
Da beim Öffnen das Makro, welches den Inhalt der ComboBox ausweist nicht geht, habe ich mir überlegt dieses Makro mit einem Automakro zu starten! Das funktioniert bei mir leider nicht, da ich nicht weiss Auf was ich mein Makro beziehen soll! Da meine Makros nur in dem Worksheet hinterlegt sind!
Kann mir jemand helfen! Danke!
Gruss Chris