Forçage checkbox

Salut à tous, je suis nouveau sur ce forum et je débute dans l'approfondissement d'Excel dans le cadre d'un stage, mon problème est le suivant : je mets à l'état VRAI ou FAUX des cellule grâce à des checkBox sous 2007, et je voudrais que l'activation d'un checkBox, bloque certains autres checkBox à l'état FAUX. J'ai tenté des trucs avec des boucles WHILE mais ça plante... comme je suis vraiment novice je trouve pas... J'espère que vous pourrez me venir en aide, un grand merci d'avance !

Bonjour et bienvenue sur le forum bulbe63,

Peux-tu joindre ton fichier ? Ça faciliterait toute aide !

Ah oui, je viens de rajouter l'extrait de mon problème en fichier Excel. Merci

Bonjour,

Met ce code dans un module standard :

Sub Caseàcocher94_QuandClic()
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
    If Shp.Name Like "Check Box*" Then
        If Left(Shp.DrawingObject.Caption, 1) = "P" Then
            Select Case ActiveSheet.Shapes("Check Box 94").DrawingObject.Value
                Case 1
                    Shp.DrawingObject.Value = False
                    Shp.DrawingObject.Enabled = False
                Case -4146
                    Shp.DrawingObject.Enabled = True
            End Select
        End If
    End If
Next Shp
End Sub

On scanne tous les objets de la feuille, si son nom commence par "Check Box", et que sa "Caption" commence par "P", on lui met sa valeur à False, et on interdit son utilisation si la checkbox94 (Période EIP) est à Vrai..

Bonne journée

Ah super merci beaucoup cousinhub, c'est parfait. Très performant, bravo.