Dateigröße ermitteln

[Wulfi]

Hallo,

ich will die Dateigröße einer bekannten Datei in einem bekanntem Verzeichnis ermitteln.
So bekomme ich die Anzahl meiner Dateien im Verzeichnis Alle:

Debug.Print CreateObject("Scripting.FileSystemObject").GetFolder("C:\Alle").Files.Count




In diesem Verzeichnis befindet sich auch meine Datei Buch.pdf, dessen Größe ich bestimmen möchte.

Wie muss ich meinen Code-Einzeiler anpassen, damit er genau das macht? Danke.

(Eine For Each Schleife möchte ich dabei nicht durchlaufen)

[Fennek]

Hallo,

es gibt auch bei FSO die Abfrage der Dateigröße, aber es geht auch

Code:

debug.print FileLen(Path & filename)

mfg

[Kuwer]

Hallo,

direkt mit Excel-VBA:

  Debug.Print FileLen("C:\Alle\Buch.pdf") / 1024 & " MB"

Gruß Uwe

[Wulfi]

Hallo,

vielen Dank euch beiden!

Aber nochmal was ist mit so etwas:

Debug.Print CreateObject("Scripting.FileSystemObject").GetFolder(.......????


geht da was? Oder gibt es eine solche Methode nicht und ich müßte die übliche For-Each Schleife durchlaufen.