Aufruf Unterroutine je nach Eingabe
21.11.2021 17:05:09
Günther
ich habe ein Problem mit dem Aufruf einer Unterroutine nach Eingabe in eine bestimmte Zelle.
Ausgangssituation:
ich gebe in Zelle AE43 oder AE45 einen Suchbegriff ein.
Erfolgte die Eingabe in Zelle AE43 dann soll die Unterroutine "ausfuehren_finden" aufgerufen werden.
Erfolgte die Eingabe in Zelle AE45 dann soll die Unterroutine "ausfuehren_ordner" aufgerufen werden.
Folgenden Code habe ich hinterlegt:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$AE$43" Then Exit Sub
ausfuehren_finden
If Target.Address "$AE$45" Then Exit Sub
ausfuehren_ordner
End Sub
Bei Auswahl in Zelle AE45 geht leider nichts.
Ich denke das liegt an "then exit Sub" bei AE43.
Wie muss ich das schreiben dass beide Varianten funktionieren?
Bin für jeden Tipp dankbar.
Servus Günther