Makro in VBA nur bei erfüllter Bedingung starten
10.09.2018 16:42:43
Nordwestler
ich habe zwar viele Beiträge zu if und if in if gefunden, aber keiner passte so richtig, deshalb meine Frage an die VBA-Kenner im Forum:
Bei Änderung des Wertes in D2 werden automatisch etliche Makros ausgelöst. Das klappt auch wunderbar. Nun gibt es aber ein Makro, dass nur dann gestartet werden soll, wenn z.B. in Zelle B16 eine 1 steht, wenn B16 leer ist, soll das Makro nicht gestartet werden. Es folgen weitere Makros, die davon unabhängig sind.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("D2"), Target) Is Nothing Then
Call Daten_UA_selektieren
Call Daten_Monate_selektieren
Call Daten_Monate_xy_selektieren
Call Daten_MJV_xy selektieren
'Diese Makro soll nur gestartet werden, wenn B16 = 1
Call Export_MJV_aktivieren
' Ansonsten weiter zum nächsten
'Call Tabellenbereich_in_externe_Datei_kopieren_und_unter_neuem_Namen_speichern
End If
End Sub
Weiß jemand Rat oder geht das gar nicht?
Beste Grüße aus dem Nordwesten!