Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

ein Inhaltsverzeichnis in Msgbox

Forumthread: ein Inhaltsverzeichnis in Msgbox

ein Inhaltsverzeichnis in Msgbox
17.10.2007 12:45:03
Timonski
Servus
ich will über vba das inhaltsverzeichnis als msgbox ausgeben...
in A1 steht das Inhaltsverzeichnispfad...
danke für eure hilfe...
Timonski

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: ein Inhaltsverzeichnis in Msgbox
17.10.2007 12:54:47
Oberschlumpf
Hi Timonski
Versuch es mal mit diesem Makro in einem allgemeinen Modul:

Sub DirInMsg()
Dim lstrFile As String, lstrMsg As String
lstrFile = Dir(Range("A1").Value & "\" & "*.*")
lstrMsg = lstrFile & vbCrLf
Do Until lstrFile = ""
lstrFile = Dir
lstrMsg = lstrMsg & lstrFile & vbCrLf
Loop
MsgBox lstrMsg
End Sub


Hilft das?
Ciao
Thorsten

Anzeige
AW: ein Inhaltsverzeichnis in Msgbox
17.10.2007 13:02:00
Timonski
WOW
vielen vielen dank für deine schnelle Antwort
Timonski

gerne :-) o.T.
17.10.2007 13:11:00
Oberschlumpf
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18