VBA-Excel-Funktion für die Rückgabe-Datei Größe in byte
Ich zurückgeben möchten, die Größe der Datei einige Dateien in den selben Ordner oder in einem anderen eins mit VBA in Excel 2010.
- sorry mein Fehler, die Funktion funktioniert perfekt. Mein computer ist in deutscher Sprache Einstellungen, dass ist der Grund, warum ich brauchte, um zu verwenden ";" nicht "," Danke trotzdem
- Statt
If Right(strFolder, 1) <> "\" Then strFolder = strFolder & "\"
und dannstrFolder & strFile
verwenden Sie einfachOFS.BuildPath(strFolder, strFile)
. - Bitte Bearbeiten Sie die Frage zu reflektieren, neue Einsichten, post eine Antwort, oder löschen Sie es... jetzt sitzt nur da, unbeantwortet, potentiell jedermanns Zeit zu vergeuden.
- ja du hast Recht, aber die Antwort, die ich geschrieben korrekt ist, sollte poste ich die gleiche Antwort wieder? Wenn das jemand liest die Kommentare(alle) Sie werden sehen, dass es in diesem moment.
- Der Zeitpunkt der Entsendung eine Antwort ist, dass die Leute nicht sagen "oh look, niemand war in der Lage eine Antwort zu geben, werde ich gehen und schauen!" Und nach dem Lesen die Frage und die Kommentare, die Sie realisieren, dass Sie keine Hilfe nötig war... Aber Sie nicht bekommen Ihre fünf Minuten zurück. Also - vielen Dank für das posten deiner Lösung!
Du musst angemeldet sein, um einen Kommentar abzugeben.
Es ist eine sehr schöne und einfache VBA-Funktion, die nicht erwähnt wurde bisher, FileLen:
FileLen("C:\Temp\test file.xls")
Es gibt die Größe der Datei in bytes.
In Kombination mit einer Schleife durch die Dateien in einem Verzeichnis ist es möglich zu erreichen, was Sie ursprünglich wollte (get Größen der Dateien in einem Ordner).
Hier, wie es zu benutzen in Excel-Zelle:
Wenn Sie ein Deutsches Windows als:
Hier ist die Funktion für das VBA-modul: (aktivieren Sie Einfach die Developer tools, und kopieren Sie und fügen Sie diese in ein neues modul)
;
ist zu tun? Ist es die Trennung der zwei Parameter der Funktion, oder ist es als ein operator verketten? Ich habe nie gesehen, es als das ehemalige, und nur inPrint
Aussagen wie die letztere. In Ihrer Funktion, nicht dieIsMissing (StrFile)
True oder False zurückgeben? Ist das Semikolon auch verwendet, wenn Sie rufen Sie die Funktion in VBA, oder nur, wenn Sie eine spreadsheet-Funktion?;
ist eine Sprache Einstellung option in Windows, können Sie es ändern, jedes mal. In der deutschen-Einstellungen der,
funktioniert nicht in excel als Trennzeichen. Es ist unter Einstellungen, Regionen und Sprache Format Deutsch.Dies ist in der Antwort auf die Frage bezüglich der Verwendung von das Semikolon
;
als parameter seperator.In einheimischen (wie UNS), die durch den Punkt/fullstop
.
als dezimal-Punkt, Koma,
wird als Liste mit Trennzeichen, in diesem Fall wird als Trennzeichen in der Liste der Parameter von VBA-Funktionen und-Prozeduren.In anderen einheimischen (wie DE und Europa im Allgemeinen), wo das Dezimaltrennzeichen ist der Koma
,
würde die Dinge verwirrend, wenn das gleiche symbol verwendet wurde, als Liste mit Trennzeichen, so dass die semcolon;
verwendet wird statt