erreur dans le code que je n'arrive pas à trouver

sourcier08

XLDnaute Occasionnel
Salut,

J'avais décidé de faire un userform pour calculer les points de belote.
Pour une raison inconnue, celui-ci ne veut plus attribuer correctement les points de litige.

Seule l'équipe 1 les récupère.

Merci d'avance à celui qui arrivera à trouver mon/mes erreur(s).
 

Pièces jointes

  • points_belote.xls
    118.5 KB · Affichages: 55
  • points_belote.xls
    118.5 KB · Affichages: 64
  • points_belote.xls
    118.5 KB · Affichages: 66

sourcier08

XLDnaute Occasionnel
Re : erreur dans le code que je n'arrive pas à trouver

Quand je clique sur introduire le score, et que j'obtiens un litige.
exemple : équipe 1 prend, annonce la belote et marque 71 points.
Tout va bien et les points de litige restent en suspend en cellule "points".


Mais lorsque l'équipe 1 une prend ensuite et marque 40 points,celle-ci est dite "dedans", mais les points de litige sont attribués à l'équipe 1 alors que l'équipe qui obtient le plus gros score doit ramasser le litige.
En l’occurrence, les points de litige devraient s'additionner au 162 que marque l'équipe 2 et l'équipe 1 marque 0 points.


[edit] Je viens de trouver mon erreur. Il fallait changer :
162 - checkbox1.text

par

162 - checkbox1.value
 

Pièces jointes

  • points_belote.xls
    118.5 KB · Affichages: 44
  • points_belote.xls
    118.5 KB · Affichages: 53
  • points_belote.xls
    118.5 KB · Affichages: 57
Dernière édition:

sourcier08

XLDnaute Occasionnel
Re : erreur dans le code que je n'arrive pas à trouver

Pas si bien que ça, après quelques contrôles, je me retrouve maintenant dans le cas de figure inverse. C'est tout le temps l'équipe 2 qui reçoit les points de litige.

J'ai déclaré t1 et t2 valant leurs textbox.text (en variant)
J'ai changé tous les textbox.text dans mon code en t1 ou t2

Mais ça ne résout pas mon problème pour autant.


******************************************************
[edit - 13h30]

CDbl : je ne connaissais pas ça comme déclaration. Mais c'est utile pour les textbox (numériques).

t1 = cdlb(textbox1)


Tout va bien (attribution et calcul des points, litige compris) à l'exception d'une erreur de variable que je ne sais pas résoudre. Ce n'est pas gênant en soi si on ne s'amuse pas à cliquer sur la belote après avoir introduit les points.

Le fichier fonctionne mais une erreur subsiste même si elle ne gêne pas lorsqu'on suit la bonne marche de l'UserForm.
 

Pièces jointes

  • points_belote.xls
    481 KB · Affichages: 57
  • points_belote.xls
    481 KB · Affichages: 59
  • points_belote.xls
    481 KB · Affichages: 89
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 177
Messages
2 085 972
Membres
103 073
dernier inscrit
MSCHOE16