Remarque : La fonction, la méthode, l’objet ou la propriété décrite dans cette rubrique est désactivée si le service d’expression Microsoft Jet s’exécute en mode bac à sable, ce qui empêche l’évaluation d’expressions potentiellement dangereuses. Pour plus d’informations sur le mode bac à sable, recherchez « mode bac à sable » dans l’aide.
Renvoie une valeur de type Long qui représente la taille, en octets, d’un fichier ouvert à l’aide de l’instruction Open .
Syntaxe
LOF( filenumber )
Le argument filenumber requis est un entier contenant un numéro de fichier valide.
Remarque : Utilisez la fonction FileLen pour obtenir la longueur d’un fichier qui n’est pas ouvert.
Exemple
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise la fonction LOF pour déterminer la taille d’un fichier ouvert. Cet exemple suppose que TESTFILE est un fichier texte contenant des exemples de données.
Dim FileLengthOpen "TESTFILE" For Input As #1 ' Open file.FileLength = LOF(1) ' Get length of file.Close #1 ' Close file.
