togglebutton caprices et fantaisies [Résolu]

[alsimbad]

bonsoir tout le monde.
un petit iatus que je ne m'explique pas. si quelqu'un sait, je suis preneur.
j'utilise plusieur controle togglebutton. je les utilse sous cette forme pour rechercher leur valeur qui me sert de condition

Code :

1
2
3
4
5
6
7
8
9
for i = 1 to 7
Select Case Controls("ToggleButton" & i).Value
Case False ' calcul a la piece
If IsNumeric(Controls("nbheure" & i)) And Not Controls("horaire" & i).Value = "" Then _
Controls("prixparheure" & i) = Round(tarifforfaits(Controls("horaire" & i).ListIndex + 1, 1) * Controls("nbheure" & i), 2)
 
Case True 'calcul en cas de cout par production
If IsNumeric(Controls("nbheure" & i)) And Not Controls("horaire" & i).Value = "" And IsNumeric(nbpiece) Then _ ....
next i

cela marche tres bien, et ce qui est important en l'occurence, leur valeur est déclarée en public.
par contre, dans une autre macro du meme uservorm, je souhaite écrire leur valeur (pour mémoire) dans une cellule.
j'tilise le meme principe

Code :

1
2
3
For i = 16 To 22
Cells(n, i + 14) = Controls("ToggleButton" & i - 15).Value
Next i

et la , au lieu d'obtenir la valeur false ou true, je n'obtien que 0 a chaque fois. du coup, je ne sais pas quoi faire, pour conserver la mémoire de position de ces bouton. si un esprit bienveillant pouvait me trouver une réponse, merci a lui

[alsimbad]

Non, laissez tomber la question, c'est une erreur de ma part. désolé d'avoir déranger les amateurs de comportement anarchique