Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 10:29:26
Userform Multipage - Page auswählen
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1380to1384
1380to1384
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

vba excel datei auswählen dialog und pfad in Tabel

Forumthread: vba excel datei auswählen dialog und pfad in Tabel

vba excel datei auswählen dialog und pfad in Tabel
29.09.2014 13:54:05
Falo
Hallo ,
kann mir einer von Euch einen Tipp geben?
ich möchte mit einem Datei Auswahl Dialog, den kompletten Pfad mit Dateiname, in die Tabelle (z.B. A1 Tabelle1) schreiben.
Mit freundlichen Grüßen aus dem Sauerland
Olaf

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: vba excel datei auswählen dialog und pfad in Tabel
29.09.2014 13:57:11
Rudi
Hallo, 
Sub aaaa()
With Application.FileDialog(msoFileDialogFilePicker)
If .Show = -1 Then
Range("a1") = .SelectedItems(1)
End If
End With
End Sub

Gruß
Rudi

AW: vba excel datei auswählen dialog und pfad in Tabel
29.09.2014 14:09:48
Falo
Hallo Ridi,
Danke, Super so soll es sein
Mit freundlichen Grüßen aus dem Sauerland
Olaf
Anzeige
;

Forumthreads zu verwandten Themen

Zellübertragung per "Datei öffnen" Dialog
Sebastian

Hallo zusammen,
folgendes Szenario:
Excel 2000
Ich habe die Excel Datei "C:\Fillmeup.xls" in die verschiedene Zellen aus der Excel Datei "C:\Quelle.xls" importiert werden sollen. Diese Zellen sollen einfach auf dem Tabellenblatt "Tabelle_Fillmeup" in die Spalte H eingetragen werden....
16.07.2009 09:17:26
Thread-ID: 1088930
9 Beiträge
VBA verschiedene Zellen auswählen und ausgeben
Roger

Hallo zusammen
Ich hab folgenden VBA Code um Daten von Excel in Word auszugeben, das funktioniert einwandfrei. Nun möchte ich den aber so abändern das er mir nur die Zellen M7, N24 und P7, Q24 und S7, T24 in Word ausgibt. Was muss ich da abändern?
Private Sub CommandButton1_Click() Dim...
23.07.2009 18:29:31
Thread-ID: 1090473
4 Beiträge
VBA Datei speichern gleich wieder öffnen
Timonski

Servus
ich habe eine Exceldatei mit viel VBA und bei einem Tabellenblatt wird die Datei sehr langsam,
dann speicher ich und lad sie gleich wieder...
und diesen Befehl würde ich gern als Icon in der Symbolleiste hinterlegen...
hätte mir da einer einen Vorschlag?
vielen Dank
21.10.2009 09:36:11
Thread-ID: 1110986
4 Beiträge
Anzeige
Mit VBA Datei auf Server öffnen
egon.kernien@online.de

Hallo Experten!
Ich lasse mit diesem Code eine Exceldatei pda.xls die auf einem Server liegt so öffnen, Daten aus einer Tabelle lesen-kopieren, schliessen.:
ChDir Pfad
strFile = Application.GetOpenFilename
If strFile = "Falsch" Then Exit Sub
Set wbSource = Workbooks.Open(Fi...
03.12.2009 11:32:17
Thread-ID: 1121538
3 Beiträge
"Datei öffnen"-Dialog mit Pfadvorgabe
Holger

Hallo Excelaner,
wie kann ich eine Application.GetOpenFilename("Dateityp (*.txt; *.log; *.dat),")
Anweisung auf einen fixen Pfad (z.B. "H:/Test/" ) ausführen?
Es soll also im "Datei öffnen"-Dialog der Pfad schon vorbelegt werden.
Für Hilfe wäre ich sehr dankbar!
Gruß Holge...
12.01.2011 14:51:59
Thread-ID: 1195263
6 Beiträge
Anzeige
vba Datei öffnen, Erweiterung unbekannt
Daniel

Hallo VBA - Experten,
Wie öffne ich in vba eine Exceldatei, ohne dass ich die Dateierweiterung kenne? Mein Problem: ich habe ein Makro erhalten, welches Dateien im Excel 2003 - Format öffnet. Das Öffnen sollte auch funktionieren, wenn die Dateien in einem neueren Format mit anderer Erweiter...
09.04.2011 16:16:22
Thread-ID: 1209733
4 Beiträge
Öffnen einer Datei per VBA
Christian

Hallo Forum,
ich möchte per VBA eine Datei öffnem, deren Pfad und Namen als Text in einer Zelle steht.
in A1 steht "D:\test.xls"
dann will ich im Macro den Befehl:
Datei$ = Cells(1, 1).Select
verwenden, um den Namen in der Variablen Datei$ zu speichern.
Das geht nicht....
18.08.2011 12:48:10
Thread-ID: 1226611
4 Beiträge
Datei Öffnen Dialog
Wolfgang

Hallo,
ich habe nochmal ein kleines Problem mit meinem VBA Makro.
Und zwar geht es um folgende Sequenz:
Dateiname = Worksheets("WSG30").Cells(4, 1).Value & ".xlsx"
objexcel.Workbooks.Open (ThisWorkbook.Path & "\" & Dateiname)
objexcel.Visible = False
Rein the...
20.09.2011 10:59:12
Thread-ID: 1230691
4 Beiträge
Datei-Öffnen-Dialog für gleichen Ordner
KlausF

Hallo Excelfreaks,
in einem Makro rufe ich den Öffnen-Dialog auf und speichere den Namen der geöffneten Datei (ohne Pfad!) in eine Variable.
Das mache ich mit:
öffnen = Application.Dialogs(xlDialogOpen).Show
If öffnen = False Then Exit Sub
Projekt = ActiveWorkbook.Name
K...
04.11.2011 12:01:45
Thread-ID: 1236626
4 Beiträge
xldialogprintersetup beim öffnen der Datei per vba
Marcel

Hallo zusammen,
Ich habe folgendes Problem:
Beim öffnen meiner Exceldatei öffnet sich das Dialogfenster "Printersetup".
Ich möchte das dieser Vorgang per VBA-Code abgebrochen wird.
Könnt Ihr mir helfen?
Gruß Marcel
09.01.2013 07:21:01
Thread-ID: 1293347
4 Beiträge
Öffnen von Excel-Dateien mittels VBA
Excel-Dateien

Folgendes Problem:
Ich habe die Möglichkeit geschaffen über einen Button verschiedene Anwendungen zu starten (unter anderem auch einfache Excel-Dateien), die Datumsangaben, Wochentage etc. enthalten. Wird nur eine Datei geöffnet, funktioniert alles normal; nur in manchen Fällen erscheint da...
13.05.2013 13:25:48
Thread-ID: 1312694
7 Beiträge
VBA Verzeichnis auswählen
PeTeR

Hallo VBA-Freaks,
ich suche nach einem Dialog zur Auswahl eines Verzeichnisses (nicht Datei!), aber mit Anzeige der darin enthaltenen Dateien.
Getopenfilname - muss ich eine Datei auswählen!
FileDialog(msoFileDialogFolderPicker) - sehe ich die Dateien im Verzeichnis nicht!
Viele...
04.12.2013 09:27:16
Thread-ID: 1341172
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

VBA: Datei auswählen und Pfad in Excel speichern

Schritt-für-Schritt-Anleitung

Um mit Excel VBA einen Datei-Auswahldialog zu öffnen und den vollständigen Pfad der ausgewählten Datei in eine Zelle zu schreiben, folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.

  2. Gehe zu Einfügen > Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden VBA-Code in das Modul ein:

    Sub DateiAuswaehlenUndPfadSpeichern()
    With Application.FileDialog(msoFileDialogFilePicker)
        If .Show = -1 Then
            Range("A1").Value = .SelectedItems(1)
        End If
    End With
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Drücke ALT + F8, wähle DateiAuswaehlenUndPfadSpeichern und klicke auf Ausführen.

Der Pfad der ausgewählten Datei wird nun in die Zelle A1 deiner Tabelle geschrieben.

Häufige Fehler und Lösungen

  • Fehler: "Laufzeitfehler 424: Objekt erforderlich"

    • Lösung: Stelle sicher, dass der Code in einem Modul und nicht in einem Arbeitsblatt oder einer Benutzerform eingefügt wurde.

  • Fehler: Dialog öffnet sich nicht

    • Lösung: Überprüfe, ob du die richtige Excel-Version verwendest, die den FileDialog unterstützt (Excel 2007 und höher).

Alternative Methoden

Falls du keinen VBA-Code verwenden möchtest, kannst du auch die Funktion HYPERLINK in Excel nutzen, um einfach Dateien zu verlinken, jedoch wird der Pfad hier nicht automatisch in eine Zelle geschrieben.

Ein weiteres Werkzeug ist das DATEIÖFFNEN-Dialogfenster, welches du über Datei > Öffnen erreichen kannst. Dies ist jedoch nicht automatisiert und erfordert manuelle Eingaben.

Praktische Beispiele

Hier ist ein einfaches Beispiel für die Verwendung des VBA-Codes:

  • Beispiel 1: Wenn du eine Datei namens Beispiel.xlsx auswählst, wird der Pfad C:\Benutzer\DeinName\Dokumente\Beispiel.xlsx in Zelle A1 geschrieben.

  • Beispiel 2: Du kannst den Code auch erweitern, um den Pfad in eine andere Zelle zu schreiben oder mehrere Dateien auszuwählen:

    Sub MehrereDateienAuswaehlen()
    Dim i As Integer
    With Application.FileDialog(msoFileDialogFilePicker)
        .AllowMultiSelect = True
        If .Show = -1 Then
            For i = 1 To .SelectedItems.Count
                Cells(i, 1).Value = .SelectedItems(i)
            Next i
        End If
    End With
End Sub

Tipps für Profis

  • Nutze den vba datei öffnen dialog, um verschiedene Dateitypen in deiner Anwendung zu filtern. Dies kannst du mit der .Filters-Eigenschaft des Dialogfensters tun.

  • Experimentiere mit dem vba zelle auswählen, um dynamisch zu entscheiden, in welche Zelle der Pfad gespeichert werden soll. Du könntest beispielsweise die aktive Zelle verwenden:

    ActiveCell.Value = .SelectedItems(1)

FAQ: Häufige Fragen

1. Wie kann ich den Pfad in eine andere Zelle schreiben? Du kannst die Range("A1") im Code durch die gewünschte Zelle ersetzen, z.B. Range("B2").

2. Funktioniert der Code in allen Excel-Versionen? Der Code ist ab Excel 2007 und höher kompatibel. Ältere Versionen unterstützen nicht das FileDialog-Objekt.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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