Bonjour
zbig a écrit :
Cependant si je crée une ligne ou si je refrappe la lettre du sexe, la couleur se met correctement
C'est lors de la modification de cette case que la couleur d'écriture est mise en place
zbig a écrit :
si je supprime les valeurs g et f, (en les sélectionnant toutes)
j'ai un message d'erreur qui apparait : erreur execution 13
Rajoutes en début de macro
Private Sub Worksheet_Change(ByVal Target As Range)
Dim HeurNum As String
Dim HeurHeur As String
Dim LongSaisie As Integer
'les colonnes avec du vert clair en fond
If Target.Count > 1 Then Exit Sub
If Not Intersect(Range("C:C,G:G,H:H,K:K,M:M"), Target) Is Nothing And Target.Interior.ColorIndex = 35 Then