Re bonjour
merci Jm pour cette formation à distance.
je vais essayer de comprendre cette sub
Private Sub Worksheet_Change(ByVal Target As Range)
' la cible est une plage de cellule
' Macro permettant le calcul de la pénalité mixité
'si je ne suis pas dans la colonne G alors je quitte
If Target.Column <> 7 Then Exit Sub
'si je ne suis pas dans la ligne > 3 alors je quitte
If Target.Row < 3 Then Exit Sub
Select Case Cells(Target.Row, 7)
'si la cellule sélectionnée en colonne G est ="" alors la cellule en colonne H de la même ligne = ?
Case Is = "": Cells(Target.Row, 8) = "?"
'si la cellule sélectionnée en colonne G est =0 alors la cellule en colonne H de la même ligne = 20sec
Case 0: Cells(Target.Row, 8) = "20sec"
'si la cellule sélectionnée en colonne G est comprise entre 1 et 4 alors la cellule en colonne H de la même ligne = vide
Case 1 To 4: Cells(Target.Row, 8) = ""
End Select
End Sub
ai je bien compris la sub private ?
merci
Chvalet