Hilfe bei Listenfeld
Micha
Mit einem Listenfeld (Formularsteuerelement) möchte ich verschiedene Makros ausführen.
Dem Listenfeld habe ich folgende Werte hinterlegt:
Eingabebereich:A2:A6
Zellverknüpfung: A7
Testweise habe ich den folgenden Code verwendet, aber ich erhalte die Fehlermeldung: Fehler beim Kompilieren: Variable nicht definiert
Sub Listenfeld1_BeiÄnderung()
Wert = Range("A7").Value
Select Case Wert
Case Is = 1
MsgBox "Eins"
Range("A8").Select
Case Is = 2
MsgBox "Zwei"
Range("A8").Select
Case Is = 3
MsgBox "Drei"
Range("A8").Select
Case Is = 4
MsgBox "Vier"
Range("A8").Select
Case Is = 5
MsgBox "Fünf"
Range("A8").Select
End Select
End Sub
Micha