Bonjour,

J'ai fais un petit truc en VBA pour changer un Range des que je check la CheckBox, et ca marche tres bien !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Private Sub CheckBox3_Change()
If CheckBox3.Value = True Then
        Worksheets("Main").Range(Cells(3, 36), Cells(3, 42)).Font.Bold = True
        ElseIf CheckBox3.Value = False Then
        Worksheets("Main").Range(Cells(3, 36), Cells(3, 42)).Font.Bold = False
        End If
End Sub
Mon pb c'est que j'ai une 50aine de Checkboxes et je souhaite eviter de recopier 50 fois le code ...

Avez vous une solution qui pourrait me permettre une sorte de boucle ?

Par ailleurs, est il possible de faire une function du type :

Private Sub xxxxxx_Change()
ou xxxxxx correspond au groupename des toutes mes checkboxes ?

Et j'ai aussi trouver cette formule qui va surement m'etre utile :
ActiveSheet.OLEObjects("CheckBox" & i).Object.Value

Merci bcp d'avance pour votre aide
Alex