MsgBox anzeigen mit Pfadvorgabe
Thomas
ich möchte per Makro eine TXT Datei importieren, die an unterschiedlichen Verzeichnissen liegen kann.
Hierzu habe nutze ich folgenden VBA code:
Sub Datenimport ()
ChDir "Pfad"
' setzen des Pfades für das "Datei Öffnen"
MsgBox ("Bitte die Datei auswählen")
' Anzeigen einer Message Box mit einer Anweisung.
' Die Eingabe wird nicht geprüft
ImportDatei1 = Application.GetOpenFilename("Alle Dateien (*.*), *.*")
End Sub
Wenn ich dieses Makro dann ausführe, kann es sein, daß der Pfad nicht übernommen wird.
Wird die MsgBox wird vor dem setzen des Pfades angezeigt?
Den gleichen Effekt habe ich, wenn ich nach Ausführung aller Anweisungen, eine "Fertigmeldung" anzeigen möchte.
Die Meldung erscheint bereits, obwohl die Anweisungen noch nicht vollständig abgearbeitet wurden.
Was mache ich falsch?
Vielen Dank vorab
Thomas