Retour sur cellule de départ

[Evelynetfrancois]

Bonsoir le forum

Je cherche comment mémoriser l'adresse d une cellule de départ
(Différente chaque fois bien sur)
Je suis par exemple sur la cellule (M10), ma macro part sur une autre feuille pour y écrire des infos
Je reviens sur la feuille de départ,……… mais comment revenir sur la cellule (M10) directement
Merci pour toutes vos bonnes idées habituelles
Très bonne soirée à tous
E et F

 

[joss56]

Re : Retour sur cellule de départ

Bonjour à tous,

En ajoutant à la fin de la macro:

sheets("nom_de_la_feuille").range("m10").select

 

[pierrejean]

Re : Retour sur cellule de départ

re

A tester

dim ad as String
ad=Activesheet.Activecell.Address
......
Activesheet.Range(ad).select

En supposant que le code ne change pas la feuille active !!!

sinon revenir et on regardera

 

[Pierrot93]

Re : Retour sur cellule de départ

Bonjour Evelyneetfrancois, PierreJean, Joss

si tu changes de feuille pendant l'execution du code, tu peux essayer comme ceci :

Sub test()
Dim c As Range
Set c = ActiveCell
'ton code
Application.Goto c
End Sub

bonne soirée
@+

 

[Evelynetfrancois]

Re : Retour sur cellule de départ

Merci joss
mais ma cell de depart est differentes chaque fois

Merci pierrjean
dans l idée c'est tout a fait ça mais .......ça beug
dim ad as String
ad=Activesheet.Activecell.Address
......
Activesheet.Range(ad).select
Message : propriete ou methode non géree...................

En supposant que le code ne change pas la feuille active !!!
en fait je suis sur la feuille active , je vais sur une autre pour y ecrire, puis je reviens sur la feuille de depart (l'active en fait)
a bientot te lire
E et F

 

[Pierrot93]

Re : Retour sur cellule de départ

Re

regarde peut être mon post plus haut....

 

[Evelynetfrancois]

Re : Retour sur cellule de départ

MERCI PIERROT
Oups je n'avais pas vu ton post ..........
et bien voilà c'est parfaitement ce que je souhaitais
ça fonctionne parfaitement
merci beaucoup à vous deux , trois
bonne soirée
@+
E et F