Bonjour,
Je voudrai pouvoir effacer la cellule B2 à chaque fois que je change le contenu de la cellule B1. Malheureusement avec:
Private sub worksheet SelectionChange (byval....)
' et tout le programme pour effacer le contenu de la cellule B1
end sub
Placé dans la feuille "Feuil1" et pas dans un module, cela ne fonction pas comme je veux car je ne sais pas comment lui dire de ne le faire que quand je change la valeur de B1 et pas quand je change des valeurs ailleurs.
En mettant une condition sur le contenu de B1 avant le changement qui s'écrit en A1 et qui execute l'effacement de B2 que si B1.value <> A1.value cela fonctionne.
Sauf que pour un problème de protection de feuille que je sais mettre et enlever en VBA dès qu'il sélectionne la cellue B2 pour l'effacer il recommence le private sub et avec la protection ça plante.
Alors comment faire pour que l'effacement ne s'opère qu'après le changement de B1 ?