Executer macro après modification de certaines cellules

Résolu/Fermé
titeufdu89 Messages postés 375 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 - 21 juil. 2017 à 16:42
titeufdu89 Messages postés 375 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 - 21 juil. 2017 à 17:57
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

ccm81 Messages postés 10853 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 avril 2024 2 404
Modifié le 21 juil. 2017 à 17:49
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
0
titeufdu89 Messages postés 375 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 38
21 juil. 2017 à 17:57
C'est juste parfait!!!
Un grand grand merci pour l'efficacité et la rapidité :-p
0