Il peut arriver que vous souhaitiez qu’une macro enregistre des informations dans un fichier texte. C’est très facile à faire. Tout ce dont vous avez besoin est d’ouvrir le fichier pour la sortie, puis de commencer à envoyer des informations au fichier. Le fragment de code suivant écrit un fichier texte à l’aide de cette méthode.

Open "MyFile.Dat" For Output As #1 Print #1, NumValues For J = 1 to NumValues     Print #1, UserVals(J)

Next J Close #1

La première chose écrite dans le fichier est une valeur numérique indiquant le nombre de valeurs individuelles qui le suivront (le code suppose que vous définissez cette valeur dans la variable NumValues). Ensuite, une boucle For …​ Next est utilisée pour créer l’équilibre du fichier.

Vous devez être conscient que le code, tel qu’il est écrit, écrasera tout fichier MyFile.Dat existant. Si vous souhaitez protéger le fichier d’une manière ou d’une autre, votre code devra vérifier s’il existe avant de l’ouvrir ou vous devrez définir les attributs du fichier en lecture seule.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (8885) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365. Vous pouvez trouver une version de cette astuce pour l’ancienne interface de menu d’Excel ici:

link: / excel-Saving_Information_in_a_Text_File [Enregistrement des informations dans un fichier texte].