Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1508to1512
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

Syntaxfehler Dateipfad

Syntaxfehler Dateipfad
23.08.2016 11:01:05
Shayev
Hallo zusammen,
ich versuche gerade ein VBA-Code zuschreiben, indem ich eine Inputbox erstelle, ich welche der User den Pfad des Ordners eingeben kann. Nun möchte ich den Pfad als Variable abspeichern und im Code auch nutzen. Leider habe ich Syntaxfehler, es sieht bei mir wie folgt aus:
Dim o as string
Dim y as workbook
o=Inputbox("Bitte geben Sie einen Pfad an!")
' Hier möchte ich, dass der Pfad der vom User eingegeben wurde mit dem Namen der Datei geöffnet wird.
Set y= Workbooks.Open o & "\Template.xlsx"
Hat vielleicht jemand ein Vorschlag? Danke im Voraus.
Viele Grüße
Shayev

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

Betreff
Datum
Anwender
Anzeige
Statt Inputbox --> Pfadwahl-Dialog...
23.08.2016 11:19:03
Michael
Hallo Shayev!
Vergiss die Inputbox, und gib dem Benutzer doch gleich die Möglichkeit in einem normalen Dateisystem-Dialog einen Pfad zu wählen. Schematisch:
Sub PfadAuswahlDialog()
Dim SuchDialog As FileDialog
Dim Pfad As String
Set SuchDialog = Application.FileDialog(msoFileDialogFolderPicker)
With SuchDialog
.Title = "Bitte Verzeichnis wählen"
.AllowMultiSelect = False
If .Show  -1 Then
MsgBox "Vorgang abgebrochen", vbInformation
Exit Sub
Else: Pfad = .SelectedItems(1)
End If
End With
End Sub
Pfad ist die Variable, mit der Du dann weiterarbeiten kannst (String!).
LG
Michael
Anzeige
AW: Statt Inputbox --> Pfadwahl-Dialog...
23.08.2016 11:52:17
Shayev
Hallo Michael,
super vielen Dank, werde es gleichmal testen.
Viele Grüße
Shayev

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige