Sujet Précédent Sujet Suivant

Excel Code simple à corriger

Résolu/Fermé
Christian Worker - 8 janv. 2008 à 12:36
 Christian Worker - 10 janv. 2008 à 11:28
Bonjour,

J'aimerai créer un button qui incrémente 1 a une cellule j'ai utilisé ce code 

Private Sub CommandButton1_Click()
       D7 = D7 + 1
End Sub


Mais comme vous vous doutez, ça ne marche pas :'-( aidez moi SVP

J'ai pas l'habitude d'utiliser Excel...

Merci Pour vos réponses
A voir également:

3 réponses

Réponse 1 / 3
dandypunk Messages postés 831 Date d'inscription jeudi 3 janvier 2008 Statut Membre Dernière intervention 11 septembre 2011 83
8 janv. 2008 à 13:07
Tu dois avoir un problème de récursivité.

Tente dans le corps :

Dim iValeur As Integer

With ActiveSheet.Cells(4, 7)
iValeur = .Value
iValeur = iValeur + 1
.Value = iValeur
End With
0
Réponse 2 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
8 janv. 2008 à 16:28
Bonjour Christian, Dandy

Sub incrementer()
Range("D7") = Range("D7") + 1
End Sub
0
dandypunk Messages postés 831 Date d'inscription jeudi 3 janvier 2008 Statut Membre Dernière intervention 11 septembre 2011 83
8 janv. 2008 à 16:50
Exact c'est plus simple, j'avais oublié Range
0
Christian Worker
9 janv. 2008 à 19:00
Salut déjà merci pour ton aide mais...

ça fonctionne pas. Je vais donner 2 ou 3 précsions.

J'aimerais créer un Button qui quand je presse il Incrémente 1 à la valeur de la case (par exemple D7 ) est ce que je dois faire encore une autre manipulation dans excel pour que mon bouton soit actif?
Ou est-ce que c'est le code qui manque qqch?

Merci pour vos lumières.
0
Christian Worker
10 janv. 2008 à 11:28
Hello

Alors Michel la solution était un mélange de nos 2 codes 

Private Sub CommandButton1_Click()
            Range("D7") = Range("D7") + 1
End Sub



Il me semble que "incrementer() " fait appel à une fonction et dans mon cas précis il fallait la fonction "CommandButton1_Click()"

Voilà

Merci pour tout à tous

A bientot
0
Réponse 3 / 3
nogaret Messages postés 34 Date d'inscription lundi 11 décembre 2006 Statut Membre Dernière intervention 2 août 2008 23
9 janv. 2008 à 19:20
il faut que sous excel tu affectes a ton bouton la macro que tu viens d'ecrire
A+
0