Mehrfaches OnError in einer Schleife
06.02.2018 10:14:29
Burkhard
wenn ich in einer aufgerufenen Funktion die OnError GoTo Methode verwende, funktioniert das nur beim ersten Auftreten eines Fehlers (in einer For-Schleife wird dann der nächste Durchlauf gestartet). Beim zweiten Auftreten (in derselben Schleife) springt das Programm in die rufende Prozedur (in untigem Codeschnipsel nach Main) zurück.
Sub Main
If .functionname.> = "something" Then ...>
End Sub
Public Function .functionname.> As String
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
Err.Clear
On Error GoTo NextFor
.some code.> ==> ERROR
NextFor:
Next
End Function
Warum wird beim zweiten Fehler in der Schleife das GoTo nicht mehr durchgeführt?
Grüße
Burkhard