Userform Dateipfad suche

Forumthread: Userform Dateipfad suche

26.02.2020 12:13:55

Herbert

Hallo meine Lieben,
ich wollte fragen ob es möglich ist genau so eine Dateipfad suche in einer Userform einzurichten, so das man halt manuel in der Userform immer einen neuen Ordner aussuchen kann, damit jeder sein eigenes Speicherziel aussuchen kann, halt wie als wenn ich in einer Zelle in Excel einen Dateipfad erstelle.
Ich hoffe man versteht was ich meine,
vielen Dank schonmal im Voraus,
LG Herbert!

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Userform Dateipfad suche

26.02.2020 12:22:33

Torsten
AW: Userform Dateipfad suche

26.02.2020 12:28:51

Herbert
AW: Userform Dateipfad suche

26.02.2020 12:52:34

Herbert
AW: Userform Dateipfad suche

26.02.2020 13:02:16

UweD
AW: Userform Dateipfad suche

26.02.2020 16:11:11

Herbert
Danke für die Rückmeldung. (owT)

26.02.2020 16:12:32

UweD

AW: Userform Dateipfad suche

26.02.2020 12:22:33

Torsten

Hallo Herbert,
warum das selber basteln. Dazu gibt es die Funktion FileDialog(msoFileDialogSaveAs). Schau dir diese mal im Internet an. Gibts viele Erklaerungen dazu.
Gruss Torsten

AW: Userform Dateipfad suche

26.02.2020 12:28:51

Herbert

Hallo Torsten,
vielen danke für die schnelle Antwort, ich habe mir gerade eine Formel dazu durchgelesen.
Ich versuche es mal umzusetzen, solange lass ich diesen Beitrag noch auf wenn ich es hinbekomme schreib ich nochmal und dann kann der zu!
LG Herbert!

AW: Userform Dateipfad suche

26.02.2020 12:52:34

Herbert

Hallo Torsten und alle anderen,
nein ich kriege es nicht hin, also bei mir hat sich ein fenster geöffnet aber dort sollte ich dann eine Datei auswählen die ich haben will, aber er soll einen Dateipfad haben wo er alles hinspeichern kann/soll.
Vielen Dank im Voraus,
LG Herbert!

AW: Userform Dateipfad suche

26.02.2020 13:02:16

UweD

Hallo
dann nimm Folderpicker
so?

Sub Datei_Verzeichnis_wählen()
    Dim Dlg As FileDialog
    Dim Startpfad As String, Pfad
    
    Startpfad = "C:\temp\" 'oder = ThisWorkbook.Path 
    
    Set Dlg = Application.FileDialog(msoFileDialogFolderPicker) 'Verzeichnis wählen 
    With Dlg
        .InitialFileName = Startpfad 'Welches Verzeichnis soll voreingestellt sein 
    End With
    If Dlg.Show = True Then
        Pfad = Dlg.SelectedItems(1)
    End If
End Sub

LG UweD

AW: Userform Dateipfad suche

26.02.2020 16:11:11

Herbert

Hallo UweD,
danke für dei Antwort!
Habe es einwenig ausprobiert, aber jetzt klappt es.
Vielen Dank,
LG Herbert!

Danke für die Rückmeldung. (owT)

26.02.2020 16:12:32

UweD

Beliebteste Forumthreads (12 Monate)

Forumthread: Userform Dateipfad suche

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread