Discussion :

[guismoman33]

Est-ce possible de savoir combien de fois une icone est cliquez?Imaginons un code qui rajoute +1 a chaque fois qu'une icone est cliquez est-ce possible...Ceci m'arrangerai bien pour savoir combien de fois mon fichier a été ouvert sur le réseau voilou merci de m'aidez svp...Je ne sais pas non plus si le langage vb est approprié a ce genre de mise en oeuvre...

[SfJ5Rpw8]

ben déjà faudrai savoir dequel genre d'icône il sagit...?

[guismoman33]

Tout simplement un icone de bureau...ou de fichier...un icone qui permet de lancer quelque chose...Dans quelque temps ce sera un icone qui permet de lancer un fichier texte en vb qui lui permettra d'ouvrir deux fichier xls.J'aimerai savoir combien de fois l'icone du fichier texte a été cliquez...

[guismoman33]

Ce code la pourrai marcher non?? mais il ne marche pas!!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim i As integer
i=0
Set Xl = CreateObject("Excel.application") 
Xl.Visible = True 
Set Wb = Xl.Workbooks.Open("U:\devis\rotation_broche.xls") 
Set Wb2 = Xl.Workbooks.Open("U:\devis\classeur12.xls")
i=i+1
MsgBox i

[guismoman33]

voila mon programme il parait qu'il y a des fin d'instrution manquante ou sa????

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Set Xl = CreateObject("Excel.application") 
Xl.Visible = True 
Set Wb = Xl.Workbooks.Open("U:\devis\rotation_broche.xls") 
Set Wb2 = Xl.Workbooks.Open("U:\devis\classeur12.xls")
Open "U:\moi.txt" For Input As #1
i = Input (100, #1)
close #1
i=i+1
Open "U:\moi.txt" For Output As #1
Print #1, i
close #1

[guismoman33]

je veux simplement que quand on clique sur mon icone deux application excel s'ouvre et que en même temps un +1 s'ajoute a mon compteur qui est dans le fichier texte moi.txt
Cela me permet à la fin de savoir combien de personne on cliquez sur mon icone...
Après j'aimerai bien faire une mini base de donné pour voir voir le total mais aussi le nombre de fois par jour etc comment pourai je faire??