Retour de l'écran à la fin d'une macro

[Laulo]

Bonjour,
J'ai créé une macro qui fait tout une tas de choses sur une feuille Excel. 🙂
Après la déclaration des variables, j'ai placé :

Application.ScreenUpdating = False

Cela permet que l'écran ne suive pas tous les travaux en cours (dites moi si je me trompe !!).
Mais à la fin, l'écran se pose pas à l'endroit où j'ai actionné la macro. (Par exemple, je me trouve en colonne AN au lieu d'être en colonne A, là où j'ai actionné la macro)
Comment faire pour revenir à l'endroit initial ??
Merci d'avance ! 😛

 

[bbb38]

Re : Retour de l'écran à la fin d'une macro

Bonjour Laulo, le forum,
A tester.

Application.ScreenUpdating = True
Range ("A1").Select

Cordialement,
Bernard

 

[Laulo]

Re : Retour de l'écran à la fin d'une macro

Bonsoir Bernard,
merci de la réponse. 🙂
J'ai effectivement pensé à cette solution, c'est top quand la macro exécutée en colonne A.
Mais dans le cas où elle est exécutée ailleurs, c'est problématique..
Cordialement

 

[eriiic]

Re : Retour de l'écran à la fin d'une macro

Bonjour,

Mémorise sa référence au début et restitue là à la fin.

sub xxxxx
    dim c as range
    set c = activecell
    ...
    c.select
end sub

eric

 

[Pierrot93]

Re : Retour de l'écran à la fin d'une macro

Bonjour à tous,

petite remarque au passage, les "select" et "activate" ne sont que très rarement utiles en vba... tu peux très bien intervenir sur une cellule, une feuille sans avoir à la selectionner.... ton code est accéléré et ta selection n'a pas bougée....

bonne journée
@+