FreeFile, fonction

Article
04/07/2023

Renvoie une valeur integer qui représente le numéro de fichier suivant que l’instruction Open peut utiliser.

Syntaxe

FreeFile [ (rangenumber) ]

L’argument facultatif rangenumber est une variante qui spécifie la plage à partir de laquelle le prochain numéro de fichier disponible doit être renvoyé. Spécifiez un 0 (valeur par défaut) pour renvoyer un numéro de fichier compris entre 1 et 255 inclus. Spécifiez un 1 pour renvoyer un numéro de fichier compris entre 256 et 511.

Remarques

Utilisez la fonction FreeFile pour fournir un numéro de fichier qui n’est pas déjà utilisé.

Exemple

Dans cet exemple, la fonction FreeFile permet de renvoyer le prochain numéro de fichier disponible. Cinq fichiers sont ouverts pour être sortis dans la boucle, et des données d’exemple sont écrites dans chacun.

Dim MyIndex, FileNumber
For MyIndex = 1 To 5    ' Loop 5 times.
    FileNumber = FreeFile    ' Get unused file
        ' number.
    Open "TEST" & MyIndex For Output As #FileNumber    ' Create file name.
    Write #FileNumber, "This is a sample."    ' Output text.
    Close #FileNumber    ' Close file.
Next MyIndex

Voir aussi

Fonctions (Visual Basic pour Applications)

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via