Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
612to616
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
612to616
612to616
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

debugger bei fehler abfangen

debugger bei fehler abfangen
24.05.2005 10:20:36
roland_k
hi guten morgen zusammen:
ich will mit nem code ne datei auswählen:
dazu habe in ner userform ne textbox:
pfad = UserForm1.TextBox1.Value
ChDir (pfad & "\Spielprotokolle") ' Anpassen!
wenn nun in der text box z. b. hallo steht (also falscher pfadname), dann
soll die userform gestartet werden.
dort gebe den richtigen pfad ein: z. b. C:\Programme\Protokoll
nun läuft mein code:
aber nun kommt immer die userform obwohl der pfad stimmt.
ich will aber dass die userform nur dann gestartet wird wenn der pfad falsch ist....
in dem fall käme der debugger in der zeile:
C:\Programme\CuteSoft\Protokoll fehler 76 pfad nicht gefunden.
ich will aber dass der debugger gar nicht gestartet wird wenn der fehler auftritt. in dem fall muesste die userform starten
? kann ich in dem fall die userform ueber das X schliessen oder muss ich nen
comandbutton(weiter) anlegen ....und was schreibe da rein ?
userform1.hide? der code soll eben dann weiterlaufen
das muesste mit ner fehlerbehandlung gehn aber wie setzte ich diese hier ein?
danke im voraus fuer ne hilfe
gruss
roland_k

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: debugger bei fehler abfangen
24.05.2005 10:41:05
Mike
Diese Methode funktioniert bei EXCEL97:
Application.DisplayAlerts = False ' Dialogboxen AUS
On Error Resume Next ' Bei Fehler weiter machen
...
ChDir ... ' hier wird der Fehler erwartet
If Err.Number 0 Then ' oder: IF Err.Number = 76 Then
userform1.show
Err.Clear
End If
On Error GoTo 0 'Fehlerbehandlung AUS - oder wieder auf ursprüngliches Label setzen
... weiter im Code
Gruß Mike
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige