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 :
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
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 :
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
Dernière édition: