Pb avec checkbox

Bonsoir everybody.

voila mon problème

sur une feuille excel, les cases b2 à B23 sont remplies.

grâce à une checkbox "associéeé à chaque case de la colonne B, je voudrais pouvoir copier chacune des valeurs dans la colonne D sur la case correspondante.

exemple

en B2 j'ai A si je coche ma box je voudrais que ce A se copie en D2

en B3 j'ai B si je coche ma box je voudrais que ce B se copie en D3

et ainsi de suite.

j'ai tester comme suis pour A.

Sub select_click()
Dim CheckBox2 As CheckBox
If Worksheets("premiere_consonne").CheckBox2.Value = 1 Then
Range("D2").Value = Range("B2").Value
Else
Range("D2").Value = ""
End If
End Sub

en affectant la macro select_click sur la box2.

je vois pas où se trouve la "luciole" dans mon script.

Troph

PS le nom de al box est case à cocher 2 quand je clique dessus du coup ya-til pas un mismatch avec chekbox2 ?

mais si je mets le nom avec les espaces ça coince aussi.

je suis dans l'impasse....

Help

Bonjour,

au lieu de mettre

If Worksheets("premiere_consonne").CheckBox2.Value = 1 Then

mettre

If Worksheets("premiere_consonne").CheckBox2.Value = True Then

"True" ou "False"

Bonsoir

merci pour ta réponse, mais j'avais tenter avec true mais n'ayant pas eu de résutat j'avais changé en 1 puis oublié de le le remettre.

cependant ça marche toujours pas.

si je coche ou décoche la case

j'ai le message suivant :

"erreur d'exécution 9

l’indice n'appartient pas à la sélection"

++

Troph

si ça merde de trop je vais mettre des boutons ça sera plus simple.

Bonjour

Pour l'indice qui ne correspond pas, il se peut que le nom de la feuille soit incorrect, ou alors que tu as mis une case à cocher (contrôle de formulaire) et non un Chekbox (Contrôle ActiveX)