Finden Fehler Zeilennummer in VBA

Ich versuche zu finden, die die Nummer der Zeile, wo mein code abstürzt, sondern viele Erklärungen, die auf dieser Website scheint zu kompliziert für mein level.

Mein code ist im Prinzip wie unten, und ich habe keine Ahnung, wo es bricht.

Sub1   
    Call function1  
    Call function2  
End Sub

Anderen Antworten auf dieser website scheint nur eine kurze Funktion. Aber ich weiß nicht, wo zum Aufruf der Funktion in meinem code, oder wie man eine popup-Meldung. Wenn ich gemeint bin, um meine sub1-code in Ihrer Funktion, ich weiß nicht, wo. Anfänger hier.

Nicht Sie ergriffen, um den code, wo der Fehler aufgetreten ist, wenn Sie die Taste Debug auf Aufforderung ? Auch das sollte Sub One() statt Sub1
"Mein code ist im Grunde wie unten". Gibt es einen Grund warum du das postest etwas, was "im Grunde" Ihr code nicht mit Ihrem eigentlichen code?

InformationsquelleAutor user2864154 | 2016-04-11

  1. 14

    Wenn Ihr code nicht Zeilennummern, dann VBA hat keine Möglichkeit geben, Sie Zeilennummern.

    Du kann schreiben von VBA und lassen es so Aussehen, 1980-dies gerne tun:

    Sub1
On Error GoTo 100
10   Call Function1
20   Call Function2
90   Exit Sub
100  Debug.Print Err.Message & " on line " & Erl
End Sub

    Aber Sie wollen nicht, das zu tun. Wirklich, Sie nicht müssen eine Zeilennummer.

    Müssen Sie kleinere Funktionen, die behandeln von Laufzeitfehlern.

    On Error GoTo ErrHandler

    Wenn ein Laufzeitfehler Auftritt, springt die Ausführung zu der line label genannt ErrHandler.

         ...
     Exit Sub
ErrHandler: '<< the line label is denoted with a colon

    Was geht in diesem handler? Wenn Sie Debuggen sind, möchten Sie vielleicht nur Stop Ausführung es und überprüfen Sie Ihre einheimischen:

        Stop

    Dann fügen Sie Resume auf die nächste Zeile, und drücken Sie F8, um Schritt in. Resume wird wieder der Aufruf, der den Fehler verursacht hat. Wenn das eine Funktion aufrufen, dann müssen Sie behandeln runtime-Fehler in der Funktion.

    Stellen Sie sicher, dass Sie nie verlassen Stop und Resume Anweisungen in der Produktion-code:

    Sub WhenWillThisEnd()
    On Error GoTo ErrHandler
    Debug.Print 42/0
    Exit Sub
ErrHandler:
    Resume 'jumps back to the line that caused the error
    Resume Next 'resumes execution on the line right after the one that went boom
End Sub
    Ich wusste nicht, über Erl trotz Programmierung VBA für über ein Jahrzehnt. Ich Liebe Stack-Überlauf -- Sie jeden Tag etwas neues lernen.
    mir auch, 5 Jahre in VBA, jetzt nur ich denke, über diesen. Es gab eine Zeit, sah ich jemanden den code, label jede Zeile mit zahlen und dachte, warum die h*** sollte jemand das label alle Linien... Jetzt weiß ich warum 😀

    InformationsquelleAutor Mathieu Guindon

Schreibe einen Kommentar