macro suivant cellule sélectionnée

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 !

alfazoulou

XLDnaute Occasionnel
bonjours à tous.
voilà mon problème:
dans une macro, je voudrais que si ma cellule nommée "toto" est la cellule sélectionnée, alors la macro prend une autre orientation.
sachant que la cellule en question fait partie d'un tableau qui se rempli autmatiquement.
j'ai essayé le code suivant qui ne fonctionne pas:
If ActiveCell = [toto] Then
MsgBox "bientot fini"
j'ai essayé aussi avec ActiveName.
Merci de m'éclairer.
 
Re : macro suivant cellule sélectionnée

Bonjour,

Une solution :

If ActiveCell.Address = [toto].Address Then

Une autre :

If Not Intersect(ActiveCell, [toto]) Is Nothing Then

Je pense aussi que la macro doit se trouver dans le code de la feuille de toto, mais à vérifier...

A+
 
Dernière édition:
Re : macro suivant cellule sélectionnée

Bonjour,

Une solution :

If ActiveCell.Address = [toto].Address Then

Une autre :

If Not Intersect(ActiveCell, [toto]) Is Nothing Then

Je pense aussi que la macro doit se trouver dans le code de la feuille de toto, mais à vérifier...

A+

merci pour ta réponse rapide.
en fait la première solution ne fonctionne pas, elle me renvoi un message d'erreur d'exécution 438.
mais la seconde marche très bien merci encore.
 
Re : macro suivant cellule sélectionnée

Re

en fait la première solution ne fonctionne pas

Ce serait bien de savoir pourquoi (bien vérifier la formule), car chez moi pas de problème.

A+

Edit 1: le défaut de la 1ère solution est en fait que si l'on sélectionne sur une autre feuille la même adresse que toto, la macro s'exécute.

Edit 2 : j'ai vérifié, on peut mettre la macro n'importe où.
 
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

Discussions similaires

Retour