Problème en VBA Excel

Fermé
aymericmeffre Messages postés 8 Date d'inscription samedi 5 mars 2011 Statut Membre Dernière intervention 12 juin 2012 - 1 juin 2012 à 20:04
DR.Morpheus Messages postés 479 Date d'inscription mercredi 23 avril 2008 Statut Membre Dernière intervention 27 octobre 2012 - 1 juin 2012 à 20:21
Bonjour,

Je suis débutant en VBA et j'aimerai créer un petit programme pour un match : Lorsqu'on clique sur un bouton, celui-ci ajouterait un 'but' à une variable... Cependant lorsque je crée deux programmes distincts cela ne fonctionne pas...
Le premier programme permet d'afficher le nombre de but dans la cellule A1
Si quelqu'un peut m'aider...
Merci d'avance

Sub Affecter_valeur()

but = 0
Sheets("Feuil1").Range("A1") = but

End Sub

Sub but()
but = but + 1
End Sub



<config>Windows Vista Firefox 12.0</config>
A voir également:

3 réponses

DR.Morpheus Messages postés 479 Date d'inscription mercredi 23 avril 2008 Statut Membre Dernière intervention 27 octobre 2012 83
1 juin 2012 à 20:13
je ne connais pas trop la programmation en vba mais si tu assigne But a 0 chaque fois que tu rentre dans ta procedure Affecter_valeur() c'est normal que ça ne change pas ...

soi tu enleve le but =0 soi tu le met en dehors de ta procedure
0
aymericmeffre Messages postés 8 Date d'inscription samedi 5 mars 2011 Statut Membre Dernière intervention 12 juin 2012
1 juin 2012 à 20:16
Impossible de le mettre à l'extérieur... Sinon erreur... Je rame
0
DR.Morpheus Messages postés 479 Date d'inscription mercredi 23 avril 2008 Statut Membre Dernière intervention 27 octobre 2012 83
1 juin 2012 à 20:21
dans ce qu'a met une condition creer une nouvelle procedure ou du genre :

SI Sheets("Feuil1").Range("A1") EST VIDE
ALORS Sheets("Feuil1").Range("A1") = 0
0