Comment recuperer l'evenement: cellule modifier

  • Initiateur de la discussion Initiateur de la discussion mchbani
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

mchbani

Guest
Bonjour Forum

voila je retourne encore vers vous🙂
Est ce qu'il est possible de recuperer l'evenement qu'un cellule a ete modifie (comme LostFocus ou autre)

j'ai teste SheetSelectionChange mais c'est pas ça ce que je veux.

Merci
 
merci Minick ça marche Workbook_SheetChange

est ce qu'il ya une moyen de diferencier entre une modif faite par l'utilisateur et une modif faite par l'application, parce que dans l'evenement je modifier d'autre cellule et je reçois plusieurs evenement.

merci
 
Bonsoir mchbani, Mincik

Cet exemple montre comment désactiver des événements avant l'enregistrement d'un fichier de telle sorte que l'événement BeforeSave n'ait pas lieu.
Application.EnableEvents = False
ActiveWorkbook.Save
Application.EnableEvents = True

@+Jean-Marie
 
re mchbani, b'soir Jean-Marie,

tu peux aussi tester la variable 'Target' de l'evenement 'Change' pour savoir quelle cellule a été modifiée

Par exemple ici je regarde si Target et dans l'intersection de la plage A1:A5 si
oui j'affiche un Msgbox sinon rien:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A5")) Is Nothing Then
MsgBox "Target dans la plage predefini"
End If
End Sub


@+ Minick

PS: la solution de Jean-Marie est la plus simple a mettre en place
 
impec merci bcp

j'ai tester la premiere solution ça marche,
la deuxieme m'interesse ausi mais j'ai besoin de construire des Range dynamique:

Comment definir un Range : je connais le Row et le Column de debut et du fin?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
17
Affichages
324
Retour