Anzeige
Archiv - Navigation
1516to1520
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
Inhaltsverzeichnis

VBA InitialFileName für Dateiexploerer

VBA InitialFileName für Dateiexploerer
14.10.2016 00:00:45
Andreas
Guten Abend,
habe ein Frage zu meiner Funktion- "Dateiexplorer öffnen". Die Funktion läuft. Hätte nun gern eine Änderung, damit das Explorerfenster gleich bei ‪D:\Mein neuer Ordner öffnet.
Ist es möglich, den Befehl dahin gehend zu ändern?
Ist bestimmt etwas mit: InitialFileName = "D:\Mein neuer Ordner" - Wo und wie kann ich das einfügen?
Kann wer helfen?
  • 
    Function SelectFile() As String ' Datei Explorer Öffnen
    Dim fileDlg As FileDialog
    Set fileDlg = Application.FileDialog(msoFileDialogOpen)
    With fileDlg
    .Filters.Add "Excel File", "*.xl*", 1
    .AllowMultiSelect = False
    If fileDlg.Show = False Then
    SelectFile = ""
    Else
    SelectFile = fileDlg.SelectedItems(1)
    End If
    End With
    End Function
    
    1
    MfG Andreas
  • 2
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: VBA InitialFileName für Dateiexploerer
    14.10.2016 00:20:09
    Daniel
    Hi
    irgendwo nach With fileDlg und vor fileDlg.show.
    den Punkt nicht vergessen, da du in der WITH-Klammer bist.
    Gruß Daniel
    AW: VBA InitialFileName für Dateiexploerer
    14.10.2016 05:27:06
    Andreas
    Guten Morgen Daniel,
    danke für den Tipp- der Punkt hatte wirklich gefehlt. Nun geht es.
    MfG Andreas
    Anzeige

    305 Forumthreads zu ähnlichen Themen

    Anzeige
    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige