POP-UP Alerte cellule modifiée

  • Initiateur de la discussion Initiateur de la discussion pajude
  • 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 !

P

pajude

Guest
Bonjour,
J'utilise cette macro pour la feuil4 nommée Graph (quand je modifie la cellule M2, un pop-up s'affiche). La macro est dans cette feuille 4. J'aimerais la déplacer dans un module où j'ai une autre macro, mais ça ne fonctionne plus.
Pouvez-vous m'aider, car je n'arrive pas à mettre l'adresse.
Merci


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("M2")) Is Nothing Then
MsgBox "Avez-vous mis à jour la feuille de données !"
End If
End Sub
 
Re : POP-UP Alerte cellule modifiée

Bonsour®
plutôt :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Application.Intersect(Target, Range("M2")) Is Nothing Then
 MsgBox "Avez-vous mis à jour la feuille de données !"
 End If
End Sub

à mettre dans chaque module feuille concernée
 
Re : POP-UP Alerte cellule modifiée

Bonjour.

Quand le piano est trop loin du tabouret, c'est le tabouret qu'il vaut mieux rapprocher !
Mais de plus il est rare que des procédures soient trop éloignées pour pouvoir facilement s'invoquer mutuellement, il faut déjà qu'elles soient dans des projets différents. Les procédures d'un module standard sont Public par défaut.
 
Re : POP-UP Alerte cellule modifiée

Ça dépend d'un tas de facteurs qu'on ne voit pas sur le classeur non joint.
Vous pouvez utilisez dans ThisWorkbook un évènement de la forme Workbook_SheetQuelqueChose.
S'il y a trop de petites différences entre les différentes feuilles, dont certaines ne seraient pas à traiter, préférer faire le plus gros dans une procédure d'un module standard munie de paramètres qui précisent les différences et invoquez la dans les procédure évènement minimalistes des Worksheet concernées.
 
Dernière édition:
- 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
9
Affichages
475
Retour