Hab' im Moment wenig Zeit, deshalb nur geraten:
Hab jetzt :
If Traegername = False Then Exit SubDas klappt auch. Also wenn ich auf Abbrechen klicke dann bricht er den Vorgang ab. Perfekt. Gibt man jetzt jedoch einen Namen in das Feld ein, so springt er in den Debugger und macht nicht weiter
mit folgender Meldung : Laufzeitfehler 13 : Typen unverträglich.
Ändere mal die Zeile
Dim Traegername As String
in
Dim Traegername
Kurze Erklärung: Als String wird in Traegername eben ein Datentyp String erwartet, True oder False ist aber Boolean.
Viele Grüße
Jörg