Discussion :

[jpma75]

Bonjour,

Après la saisie d'une cellule par macro, je souhaite me déplacer sur une autre cellule et revenir sur la cellule initiale.
J'ai essayé de créer une variable toto avec ActiveCell (toto = activecell), mais je n'arrive pas à revenir sur cette cellule. Ce qui m'intéresse, ce n'est pas le contenu de la dite cellule mais son adresser, et surtout, comment revenir dessus.
Je vous remercie d'avance pour vos réponses éventuelles,
Cdt

[parmi]

Bonjour,

Je ne comprends pas le but de l'exercice, mais tu peux y aller ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

toto = Activecell.Address

et pour y revenir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range(toto).Select

[antonysansh]

Comme l'indique parmi, l'exercice est particulier. En tant que tel, parmi te répond très bien.

Par contre il est souvent déconseiller d'utiliser des Selects dans un code car ils sont inutiles et ralentisse le code énormément.
Donc sans Select dans le code, à la fin c'est bien ActiveCell qui est sélectionné.

EDIT : Attention tout de même car si tu changes de feuille tu seras a la bonne adresse mais pas sur la bonne feuille.

[jpma75]

Merci beaucoup à tous les deux. Ce code me sera utile même si dans le cas présent (ce que vous présentiez manifestement) il ne donne pas le résultat que je recherchais.
Cdt

[bboy-eazy]

bonjour,

que veux tu faire exactement?

[antonysansh]

Ce code me sera utile même si dans le cas présent (ce que vous présentiez manifestement) il ne donne pas le résultat que je recherchais.

Peut-être peux-tu expliquer plus concrètement ta problématique, ainsi quelqu'un pourra t'aider plus efficacement

[parmi]

Comme déjà dit, tu n'expliques pas pourquoi tu as besoin de te déplacer d'une cellule à l'autre.
En principe, on n'a à peu près jamais besoin de se déplacer physiquement de cellule en cellule.

Dans l'événement Change() du Worksheet, il y a le paramètre Target qui est la cellule qui vient de subir un changement.
Tu as donc accès à son adresse (Target.Address)