Hinweis: Die in diesem Thema beschriebene Funktion, Methode, Objekt oder Eigenschaft ist deaktiviert, wenn der Microsoft Jet-Ausdrucksdienst im Sandboxmodus ausgeführt wird, der die Auswertung potenziell unsicherer Ausdrücke verhindert. Weitere Informationen zum Sandboxmodus finden Sie, wenn Sie in der Hilfe nach "Sandboxmodus" suchen.
Gibt einen Long-Wert zurück, der die Größe einer mit der Open-Anweisung geöffneten Datei in Bytes darstellt.
Syntax
LOF( filenumber )
Die erforderliche DateinummerArgument ist eine ganze Zahl, die eine gültige Dateinummer enthält.
Hinweis: Verwenden Sie die FileLen-Funktion , um die Länge einer Datei abzurufen, die nicht geöffnet ist.
Beispiel
Hinweis: Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.
In diesem Beispiel wird die LOF-Funktion verwendet, um die Größe einer geöffneten Datei zu bestimmen. In diesem Beispiel wird davon ausgegangen, dass TESTFILE eine Textdatei ist, die Beispieldaten enthält.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.