V dans la cellule Y2 sur la feuil si un changement est survenu dans la feuil PKI

Fermé
yvanxp - 27 nov. 2020 à 11:23
 yvanxp - 27 nov. 2020 à 14:11
Bonjour,

Je souhaiterai avoir une coche X ou V ou une couleur (noir), sur la cellule Y2 sur la feuille "Base 2020" si il a eu un changement sur la feuille "Pki" colonne A, changement dû à un copier-coller ou juste une insertion de valeur ?

Merci à vous

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
27 nov. 2020 à 12:06
Bonjour,

en vba se mettre sur la feuille "Pki" faire Alt F11 pour accéder à l'éditeur et mettre ce code:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
Worksheets("Base 2020").Range("Y2").Value = "X"
End If
End Sub


Voilà
0
Houaw, extra, j'en ai profité pour faire d'autre cellules ;)
Y a t'il un moyen d’effacer ce X si il n'y a pas eu de modifications, pendant disons 8h ?
Merci
0