Lié une cellule à une case cocher sur un formulaire

salut Emy,

adepte de solutions originales, tu peux toujours ajouter ceci après

iFlag2=Target.Row

If Target.Count > 1 Or iFlag2 < 6 Or iFlag2 > iFlag1 Then Range("A1").Activate
If Not Application.Intersect(Target, Range("A6:C" & iFlag1)) Is Nothing Then
    Range("D" & iFlag2).Activate
End If

Mais, si un petit malin décide de faire ALT F11 et de mettre Excel en Mode création, rien ne l'empêchera de saboter tes colonnes.

Si tu veux verrouiller un peu sérieusement ton fichier, tu devras passer par REVISION - PROTEGER LA FEUILLE.

Milli... de m..., voilà que la recopie des formules ne passe plus...!!!

Je verrai ça tout à l'heure!

A+