A voir également:
- Vba freefile
- Mkdir vba ✓ - Forum VB / VBA
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Autofill vba ✓ - Forum Excel
2 réponses
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
13 juin 2009 à 08:11
13 juin 2009 à 08:11
Bonjour,
La fonction freefile attribut un numéro libre pour l'ouverture d'un fichier.
;o)
La fonction freefile attribut un numéro libre pour l'ouverture d'un fichier.
Function WriteFile(Byval pFullPath As String, Byval chaine As String) As Boolean Dim fp As Interger On Error Resume Next fp = FreeFile Open pFullPath For Input As #fp Print #fp, chaine Close #fp If Err.Number <> 0 Then WriteFile = False Else WriteFile = True End If End Function
;o)