Excel Code simple à corriger
Résolu/Fermé
A voir également:
- Excel Code simple à corriger
- Liste déroulante excel - Guide
- Aller à la ligne excel - Guide
- Formule excel - Guide
- Code asci - Guide
- Si et excel - Guide
3 réponses
dandypunk
Messages postés
831
Date d'inscription
jeudi 3 janvier 2008
Statut
Membre
Dernière intervention
11 septembre 2011
82
8 janv. 2008 à 13:07
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
Tente dans le corps :
Dim iValeur As Integer
With ActiveSheet.Cells(4, 7)
iValeur = .Value
iValeur = iValeur + 1
.Value = iValeur
End With
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
8 janv. 2008 à 16:28
8 janv. 2008 à 16:28
Bonjour Christian, Dandy
Sub incrementer()
Range("D7") = Range("D7") + 1
End Sub
Sub incrementer()
Range("D7") = Range("D7") + 1
End Sub
dandypunk
Messages postés
831
Date d'inscription
jeudi 3 janvier 2008
Statut
Membre
Dernière intervention
11 septembre 2011
82
8 janv. 2008 à 16:50
8 janv. 2008 à 16:50
Exact c'est plus simple, j'avais oublié Range
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.
ç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.
Hello
Alors Michel la solution était un mélange de nos 2 codes
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
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
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
9 janv. 2008 à 19:20
il faut que sous excel tu affectes a ton bouton la macro que tu viens d'ecrire
A+
A+
