Anzahl der Dateien im Verzeichniss

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
InputBox MsgBox


Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Anzahl der Dateien im Verzeichniss
von: alex
Geschrieben am: 17.05.2002 - 14:03:01

Wie kann ich mit VBA die Anzahl der Dateien in einem Verzeichniss ermitteln?

nach oben   nach unten

Re: Anzahl der Dateien im Verzeichniss
von: Andreas
Geschrieben am: 17.05.2002 - 14:32:08

Hallo Alex,

hier findest Du ein ähnliches Beispiel, nimm einfach nur das davon, was Du brauchst:
https://www.herber.de/mailing/162201h.htm
Viel Spaß,
Andreas

nach oben   nach unten

Re: Anzahl der Dateien im Verzeichniss
von: Bernd
Geschrieben am: 17.05.2002 - 14:51:55

Unter Excel97, BS=NT4 klappt folgendes:

Option Explicit
Sub Dateianzahl()
Dim Dateisuche As Object
Dim i As Integer

Set Dateisuche = Application.FileSearch
With Dateisuche
.LookIn = InputBox("Pfad: ", "Dateizähler", "C:\Temp")
.FileName = "*"
.Execute
MsgBox .FoundFiles.Count
End With
End Sub

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Anzahl der Dateien im Verzeichniss"