VBA CheckBox
Fermé
louis
-
23 mai 2008 à 11:57
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 23 mai 2008 à 16:48
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 23 mai 2008 à 16:48
A voir également:
- Checkbox.value vba
- Vba attendre 1 seconde ✓ - Forum VB / VBA
- Mkdir vba ✓ - Forum VB / VBA
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba dépassement de capacité ✓ - Forum Excel
11 réponses
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 12:06
23 mai 2008 à 12:06
Bonjour,
As-tu déclaré Renouv ?
;o)
As-tu déclaré Renouv ?
;o)
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 12:16
23 mai 2008 à 12:16
Es-tu sûr que le nom soit bien CheckBox1 dans la propriété ?
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 13:41
23 mai 2008 à 13:41
Oui c'est normal, mais si tu tapes "chekbox1.value = true", lorsque tu vas à la ligne tu as bien ChekBox1.Value = True. Ca veut dire que le controle et la propriété sont reconnus.
Par contre ça fonctionne très bien chez moi ... l'erreur 424 concerne je crois un objet requit ... As-tu bien fait Dim Renouv As Integer ?
Sinon je ne vois pas d'où ça peut venir ...
Par contre ça fonctionne très bien chez moi ... l'erreur 424 concerne je crois un objet requit ... As-tu bien fait Dim Renouv As Integer ?
Sinon je ne vois pas d'où ça peut venir ...
Je ne comprends pas pourquoi ça ne marche pas : ça devrait fonctionner, il n'y a aucun problème sur la papier
Voici la macro en l'état :
Sub Caseàcocher10_Clic()
If CheckBox10.Value = True Then
Renouv = 1
Else
Renouv = 0
End If
MsgBox (Renouv)
End Sub
Si j'enlève le .value, je n'obtiens plus le message d'erreur, mais bien une boite de message avec marqué 0 systématiquement.
On dirait que VBA ne reconnait pas l'instruction CheckBox10.Value
Je suis sur Excel 2007, mais ça ne change rien ?
PS merci pour le coup de main, c'est tellement frustrant...
Voici la macro en l'état :
Sub Caseàcocher10_Clic()
If CheckBox10.Value = True Then
Renouv = 1
Else
Renouv = 0
End If
MsgBox (Renouv)
End Sub
Si j'enlève le .value, je n'obtiens plus le message d'erreur, mais bien une boite de message avec marqué 0 systématiquement.
On dirait que VBA ne reconnait pas l'instruction CheckBox10.Value
Je suis sur Excel 2007, mais ça ne change rien ?
PS merci pour le coup de main, c'est tellement frustrant...
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 14:07
23 mai 2008 à 14:07
lol .... j'ai vu le blème ... voilà ce que tu dois mettre :
Voir le post 3 ... le nom du contrôle c'est "Caseàcocher10" et non ChekcBox10 qui est le type de l'objet ...
un conseil : évite les accents dans les noms de variables, d'objets ou de fonctions en programmation ...
;o)
polux
Sub Caseàcocher10_Clic() If Caseàcocher10.Value = True Then Renouv = 1 Else Renouv = 0 End If MsgBox (Renouv) End Sub
Voir le post 3 ... le nom du contrôle c'est "Caseàcocher10" et non ChekcBox10 qui est le type de l'objet ...
un conseil : évite les accents dans les noms de variables, d'objets ou de fonctions en programmation ...
;o)
polux
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 14:48
23 mai 2008 à 14:48
Non non ... VBA n'a jamais le dernier mot ... manquerait plus que ça ... ou alors je change de métier !!!
Ton If Sheets("Hypothèses").Caseàcocher12.Value = True Then ne peut pas marcher, ça c'est clair et c'est ce que signale l'erreur.
Mais je suis sûr que le bout de code que j'ai mis fonctionne. Pour preuve : https://www.cjoint.com/?fxoWfyq8FT
Il y a quelque chose d'autre ...
;o)
polux
Ton If Sheets("Hypothèses").Caseàcocher12.Value = True Then ne peut pas marcher, ça c'est clair et c'est ce que signale l'erreur.
Mais je suis sûr que le bout de code que j'ai mis fonctionne. Pour preuve : https://www.cjoint.com/?fxoWfyq8FT
Il y a quelque chose d'autre ...
;o)
polux
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 14:59
23 mai 2008 à 14:59
Je ne connais pas Excel Vista ... c'est Excel 2007 ?
Je pense que oui. Voila un lien d'un autre forum : la personne a le même problème que moi et personne arrive à le résoudre non plus. C'est déséspérant...
https://www.developpez.net/forums/d291961/logiciels/microsoft-office/excel/macros-vba-excel/vba-e-checkbox-confition-if-excel/
https://www.developpez.net/forums/d291961/logiciels/microsoft-office/excel/macros-vba-excel/vba-e-checkbox-confition-if-excel/
Je ne sais pas si cela change quelques chose, mais ma macro est dans un module, tandis que celle que tu as créé Polux se situe elle dans la fenêtre VBA de la feuille 1
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 16:15
23 mai 2008 à 16:15
je pense en effet que ça peut être ça ... sinon ça ne marche pas :O))
;o)
;o)
J'ai trouvé !!!!
En fait j'insérais un mauvais type d'objet : j'insérais un contrôle de formulaire, alors que j'aurais dû insérer un contrôle ActiveX.
Maintenant la macro fonctionne parfaitement, je n'ai plus aucun problème.
Merci pour ton temps et ton aide Polux,
A la prochaine (car on risque de me revoir dans le coin :p)
Louis
En fait j'insérais un mauvais type d'objet : j'insérais un contrôle de formulaire, alors que j'aurais dû insérer un contrôle ActiveX.
Maintenant la macro fonctionne parfaitement, je n'ai plus aucun problème.
Merci pour ton temps et ton aide Polux,
A la prochaine (car on risque de me revoir dans le coin :p)
Louis
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
23 mai 2008 à 16:48
23 mai 2008 à 16:48
:o)
Pas de blème ...
Bonne continuation
;o)
polux
Pas de blème ...
Bonne continuation
;o)
polux
23 mai 2008 à 12:12
On dirait que VBA ne reconnait pas CheckBox1