Frage : Fehlerbehandlung VBA

Hallo Experten,

Simple eins hier. Ist die immer erforderte Fehlerbehandlung. Ich nicht verwendet sie bis jetzt, aber ich gesehen sie in anderem Code usw.…, wie ich weiß, wann ich ihn benötigen und wo er in den Code gehen sollte? gibt es ein Satzstandard in, wo ausgedrückt er gesetzt werden sollte oder es völlig abhängig vom Code und von den Anweisungen ist, die geschrieben.
I gesehen es manchmal am Ende, ist dieses der beste Platz für ihn? Oder, kann ich ohne ihn vorbei erhalten?

any Zeiger sein groß!

Thanks und Beifall: -)

Antwort : Fehlerbehandlung VBA

Auf Störung sollte Zusammenfassung zunächst nur in den einfachen einzelnen Zweckunterseebooten und -funktionen im Allgemeinen benutzt werden, die durch Ihre Hauptunterseeboote benannt werden (z.B. eines Arbeitsbuches überprüfen ist geöffnet, oder ein Blatt existiert). Über diesem hinaus ist die Fehlerbehandlung wirklich für verfangende unerwartete Störungen oder Störungen, die Sie nicht auf jede mögliche andere Art bereitwillig behandeln können. Gewöhnlich haben Sie:

Auf Störung Goto- err_handler

Linie beim Anfang (wo „err_handler“ ein Aufkleber in Ihrem Code ist)

dann ein Störungszufuhrabschnitt am Ende, das in meinem Fall Sie normalerweise zu einem Reinigungabschnitt am Ende des Codes zurückbringt. Z.B.:


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:

Privates VorWorksheet_Change (ByVal Ziel als Strecke)
    Schwaches rngCell als Strecke, strPrefix als Schnur
    
   Auf Störung Goto- Worksheet_Change_Error
    
    Application.EnableEvents = falsch
    
    Wenn nicht schneiden (Ziel, Strecke („A: “)) Ist nichts dann
        strPrefix = Strecke („C2“). Wert
        Für jedes rngCell innen schneiden (Ziel, Strecke („A: “))
            Wenn Len (rngCell.Value) > 0 dann
                Wenn InStr (1, rngCell.Value, strPrefix, vbTextCompare) <> 1 dann
                    rngCell.Value = strPrefix u. rngCell.Value
                Beenden wenn
            Beenden wenn
        Folgendes rngCell
    Beenden wenn

clean_up:
    Application.EnableEvents = richten aus
   Unterseeboot herausnehmen

Worksheet_Change_Error:

    MsgBox „Störung“ u. Err.Number u. „(“ u. Err.Description u. ") im Verfahren Worksheet_Change des VBA Dokuments Sheet1“
    Zusammenfassung clean_up
Enden-Unterseeboot
Weitere Lösungen  
 
programming4us programming4us