Case à cocher

[MASSJIPE]

Bonjour
voila j'ai un nombre dans la case C1 et lorsque je coche je voudrais que le nombre le en C passe en casse E quelqu'un peut m'aider à finaliser le code
Merci
Sub Caseàcocher1_Cliquer()
ActiveCell.Select
Selection.Copy
Columns("E:E").Select
ActiveSheet.Paste
End Sub

 

[NezQuiCoule]

Re : Case à cocher

Bonjour MASSJIPE,

Ta demande semble légèrement floue, mais si j'ai bien compris

Sub Caseàcocher1_Cliquer()
    Range("E1") = Range("C1")
End Sub

Bonne journée

 

[MASSJIPE]

Re : Case à cocher

Bonjour
une colonne avec des cases à cocher quand je coche sur l'une d'elles, elle doit déplacer le nombre vers la cellule de droite et elle doit supprimer le nombre de la cellule qu'elle vient de déplacer et ensuite la case à cocher doit devenir inactive
Merci