![](https://codky.com/wp-content/uploads/2024/11/2763-1024x576.png)
L’instruction `Write #` en VBA (Visual Basic for Applications) est utilisée pour écrire des données dans un fichier textuel de manière structurée. Voici comment l’utiliser :
- Ouvrir un fichier : Avant de pouvoir écrire dans un fichier, vous devez l’ouvrir en utilisant l’instruction `Open`. Vous devez spécifier le mode d’accès (Output, Append, etc.) que vous souhaitez utiliser.
- Utiliser Write # : Une fois que le fichier est ouvert, vous pouvez utiliser `Write #` pour écrire des données dans le fichier. Cette instruction permet d’écrire les données de manière structurée (les chaînes de caractères sont entourées de guillemets, les valeurs sont séparées par des virgules, etc.).
- Fermer le fichier : Après avoir écrit les données, il est important de toujours fermer le fichier avec l’instruction `Close`.
Voici un exemple simple qui montre comment utiliser `Write #` :
Sub UtiliserWrite()
Dim fileNum As Integer
Dim nom As String
Dim age As Integer
Dim dateNaissance As Date
' Affecter des valeurs aux variables
nom = "Jean Dupont"
age = 30
dateNaissance = #1/15/1993#
' Obtenir le numéro de fichier disponible
fileNum = FreeFile
' Ouvrir un fichier en mode sortie
Open "C:cheminversvotrefichier.txt" For Output As #fileNum
' Écrire des données dans le fichier
Write #fileNum, nom, age, dateNaissance
' Fermer le fichier
Close #fileNum
End Sub
Explications :
- `FreeFile` est utilisé pour obtenir un numéro de fichier qui n’est pas encore ouvert.
- L’instruction `Open` ouvre ou créé le fichier spécifié en mode Output, permettant ainsi l’écriture.
- `Write #` écrit les variables dans le fichier. Les chaînes sont entourées de guillemets, et chaque donnée est séparée par des virgules.
- `Close` est utilisé pour fermer le fichier après l’écriture.
C’est important de noter que `Write #` diffère de `Print #` dans la manière dont les données sont formatées dans le fichier (par exemple, `Write #` ajoute des délimiteurs et des espaces convenablement autour des données). Assurez-vous que le chemin du fichier spécifié existe autrement une erreur se produira.