Discussion :

[gyzmo5]

bonjour !

Lors de l'éxécution de mon code une erreur apparait (erreur 2185):

Message : impossible de faire référence à une propriété ou de la définir pour un contrôle si ce dernier n'est pas activé .

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private sub calcul_click()
heure_tot.text = heure_matin.value + heure_soir.Value
end sub

avec ce code je veux additionné 2 zones de textes (heure matin et heure soir) et afficher le résultat dans une autre zone de texte (heure_tot).

Merci d'avance

[mcdotta]

Hello,

Je ne suis pas sûre que l'emploi de la propriété .text soit judicieux pour affecter une valeur à un control qui semble-t-il n'a pas de Source. D'autre part, il faut spécifier l'objet sur lequel sont tes contrôles, à savoir je pense ton formulaire actif.

Pourquoi n'essaies-tu pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private sub calcul_click() 
   me.heure_tot.value = me.heure_matin.value + me.heure_soir.Value 
end sub

Tu peux encore ajouter une fonction nz pour pallier à une valeur nulle d'un de tes deux controles.

[gyzmo5]

je vien de mettre ce que tu ma dit, il me met plus l'erreur de tout à l'heure mais il ne m'additionne pas les chiffre

par exemple j'ai mis 45 et 50 il me met 4550 alors que normalement il doit les additionnés donc me mettre 95 !

[mcdotta]

Alors essaie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private sub calcul_click() 
   me.heure_tot.value = Cdbl(Nz(me.heure_matin.value,0)) + Cdbl(Nz(me.heure_soir.Value ,0))
end sub

[gyzmo5]

Sa fonctionne !! jte remercie de m'avoir aidé