Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Fehler abwangen und INPUT Box anzeigen!

Fehler abwangen und INPUT Box anzeigen!
04.08.2004 08:42:46
Richie
Hi VBA Community,
habe folgendes Problem.
Erstelle in einem Makro ein Verzeichnis, dass sich nach bestimmten Vorgaben bildet. Wenn jedoch dieses Verzeichnis schon existiert, dann bleibt das Marko hängen und gibt eine Fehlermeldung aus bzw. stürzt es ab. Sonst funktioniert es einwandfrei.
Würde das Probleme gerne so lösen, dass bei der Auslösung des Fehlers eine INPUT Box erscheint und der User die Möglichkeit hat einen alternativen Namen für das Verzeichnis einzugeben.
Greets
Richie
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler abfangen und INPUT Box anzeigen!
04.08.2004 09:48:34
Nepumuk
Hallo Richie,
ein Beispielcode:


Public Sub test()
    Dim strVerzeichnis As String
    strVerzeichnis = "Eigene Temp"
    Do While Dir("D:\Eigene Dateien\" & strVerzeichnis & "\", vbDirectory) = "." Or Dir("D:\Eigene Dateien\" & strVerzeichnis & "\", vbDirectory) = ".."
        strVerzeichnis = InputBox("Der Ordner ''" & strVerzeichnis & "'' existiert bereits." & vbLf & "Bitte geben sie einen neuen Ordnernamen ein.", "Eingabe")
        If strVerzeichnis = "" Then
            MsgBox "Sie müssen einen Ordnernamen angeben.", 48, "Hinweis"
            strVerzeichnis = "Eigene Temp"
        End If
    Loop
End Sub


Gruß
Nepumuk
Anzeige
AW: Fehler abfangen und INPUT Box anzeigen!
04.08.2004 10:23:58
Richie
Super, das funzt wunderbar.
Danke sehr!
Ciao
Richie
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige