Executer macro après modification de certaines cellules [Résolu/Fermé]

Signaler
Messages postés
371
Date d'inscription
samedi 28 juillet 2012
Statut
Membre
Dernière intervention
4 mars 2019
-
Messages postés
371
Date d'inscription
samedi 28 juillet 2012
Statut
Membre
Dernière intervention
4 mars 2019
-
Bonjour,

J'ai un planning général sur un le range ("C4:AG31")
Les lignes étant les collaborateur, et les colonnes les jours du mois.
Lorsque le planning à été envoyé au collaborateur j'ai une macro qui me notifie que le planning à été envoyé par une "x" dans la colonne AH correspondant au collaborateur.

A présent, je souhaiterais que lorsqu'une cellule est modifiée dans le range("C4:AG31") si la colonne AH de la ligne modifiée comportée un "x", celui-ci soit supprimé afin que je sache que le planning est à renvoyer au collaborateur...

Quelqu'un aurait-il une idée de la marche a suivre?

Par avance merci ;-)

Jc

1 réponse

Messages postés
9673
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
19 février 2021
2 040
Bonjour

Dans le module de la feuille à traiter

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C4:AG31")) Is Nothing Then
  Range("AH" & Target.Row) = ""
End If
End Sub

RQ. Si la procedure Worksheet_Change(ByVal Target As Range) existe déjà, il faudra certainement faire un peu plus compliqué

Cdlmnt
Messages postés
371
Date d'inscription
samedi 28 juillet 2012
Statut
Membre
Dernière intervention
4 mars 2019
34
C'est juste parfait!!!
Un grand grand merci pour l'efficacité et la rapidité :-p