Microsoft 365 condition pour supprimer une valeur dans une cellule

[ricouvbx]

Bonjour le forum
Je souhaiterais pouvoir supprimer une valeur dans une cellule par rapport à une condition.
Après quelques recherche, je me suis orienté sur une macro.
Hélas je n'ai pas la maitrise du vba.
Pourriez vous m'éclairer dans cette démarche
Je vous joins le fichier pour plus de clarté.
Je vous en remercie par avance
Cordialement
Eric

 

[JHA]

Bonjour à tous,

Si c'est uniquement du visuel, tu peux mettre une MFC.

JHA

 

[piga25]

Bonjour,
Code à mettre dans le module de la feuille:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Lgn As Long
Lgn = ActiveCell.Row
If UCase(Cells(Lgn, 3)) Like "ABSENT" Then
Cells(Lgn, 1).ClearContents
End If
End Sub

 

[ricouvbx]

Bonjour à tous,

Si c'est uniquement du visuel, tu peux mettre une MFC.

JHA

Bonsoir
En effet, le format conditionnel me parait simple pour ma problématique.
Merci pour l'information
cordialement
Eric

 

[ricouvbx]

Bonjour,
Code à mettre dans le module de la feuille:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Lgn As Long
Lgn = ActiveCell.Row
If UCase(Cells(Lgn, 3)) Like "ABSENT" Then
Cells(Lgn, 1).ClearContents
End If
End Sub

Bonjour Piga
Je vais essayer de mettre en application le code .
Je vous en remercie
Cordialement
Eric