Hallo,
ich habe folgenden Code im Rahmen einer Zellenüberwachung:
If Not Application.Intersect(target, Range("G:G")) Is Nothing And Not Range("M1").Value = "" Then
zwischen = ActiveSheet.Range("K1").Value + ActiveSheet.Range("O1").Value
Set wksData = Worksheets("Daten " & zwischen & "MA")
Application.EnableEvents = False
Jetzt läuft er mir jedesmal auf Fehler13 Typen unverträglich, schubst man ihn dann weiter geht alles problemlos.
Ich vermute nach dem Debugger, dass er zu Beginn sagt, dass das Worksheet mit dem Wert zwischen = 0 nicht existiert und geht daher auf Fehler. Wie bringe ich ihn dazu nicht in einen Fehler zu laufen und "abzuwarten" bis zwischen gesetzt ist?
Per Errorhandling abzufangen und ihn einfach weitermachen zu lassen ist irgendwie nicht besonders elegant.
Grüße
Andreas