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

Explorer-Funktion über VBA

Explorer-Funktion über VBA
25.05.2009 18:31:50
Rolf
Hallo Cracks,
ich möchte gerne innerhalb einer VBA-Routine eine Datei suchen und öffnen, so wie man das normalerweise mit dem Explorer macht. Ich meine, mich zu erinnern, dass es dafür eine besondere Inputbox oder sowas gibt.
Kann mir jemand helfen?
Rolf

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Explorer-Funktion über VBA
25.05.2009 19:41:35
ChrisL
Hallo Rolf
Application.Dialogs(xlDialogOpen).Show
Gruss
Chris
AW: Explorer-Funktion über VBA
25.05.2009 20:28:37
Rolf
Hallo Chris,
genau das. Danke!
rolf
AW: Explorer-Funktion über VBA
25.05.2009 19:55:08
robert
hi,
meinst du sowas ? - ist aus dem forum...
gruß
robert

Sub Dialog()
Dim Datei2 As String, strDateiName As String
Datei2 = Application.GetOpenFilename("Excel Files (*.xls*), *.xls*")
If Datei2 = CStr(False) Then Exit Sub
strDateiName = Right$(Datei2, Len(Datei2) - InStrRev(Datei2, "\"))
MsgBox strDateiName
Workbooks.Open Datei2
ThisWorkbook.Close True 'False 'schließen ohne speichern, sonst True
End Sub


Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige