Salut,
j'aimerais dans un module vba excel 2007 pouvoir lire une valeur contenue en premiere ligne d'un fichier texte, fichier nommé "nb_visites.txt". Cette valeur correspond à un nbre de visiteurs.
J'aimerais pouvoir incrémenter cette valeur et la remettre à la place de l'ancienne (en premiere ligne)

J'ai codé cela comme ca :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim fichier As String, nb_visites As Long, str_Nb_visites as String
fichier = "c:\nb_visites.txt"
 
Open fichier For Input As #2
Input #2, str_Nb_visites
Close #2
 
nb_visites = Val(str_Nb_visites)
nb_visites = nb_visites + 1
str_Nb_visites = Str(nb_visites)
 
Open fichier For Output As #2 ***
Print #2, str_Nb_visites
Close #2
J'obtiens un message d'erreur sur la ligne *** :
Erreur d'execution 75 :
Erreur d'accès chemin/fichier

si quelqu'un peut m'aider à résoudre ce probleme...
Merci