Macro pour aller sur la feuille active

[adam75]

Bonjour à tous,

J'ai une macro que je lance à partir de la Feuil2, qui va faire des choses en Feuil1 (sans que l'utilisateur ne le vois) puis je voudrais qu'elle revienne en Feuil2 si je suis en Feuil2 ou en Feuil3 si j'ai été entre temps en Feuil3.

En fait je suis obligé de lui dire de revenir à une feuille précise si je ne veux pas que l'utilisateur vois ce qu'elle fait en Feuil1 (j'utilise Application.ScreenUpdating = False).

Comment faire pour qu'elle revienne là où je me trouve.

J'epsère que c'est clair.

Merci d'avance.

 

[SergiO]

Re : Macro pour aller sur la feuille active

Bonjour adam75,

Tu peux essayer ceci:

Tu mets Feuille = ActiveSheet.Name en début de code
puis Sheets(Feuille).Activate en fin de code.

@+

 

[Banzai64]

Re : Macro pour aller sur la feuille active

Bonjour

As tu essayé la procédure événementielle Worksheet_Deactivate

 

[Excel-lent]

Re : Macro pour aller sur la feuille active

Bonjour Adam75, le fil, le forum,

Je vois que certains ont fait vite!!

Voici ma version (qui s'inspire beaucoup de celle de Sergio)

Sub FeuilleActive()
' Macro enregistrée le 15/11/2007 par Excel-lent

' A placer au début de ta macro
Dim FeuilleUtilisateur As Variant
FeuilleUtilisateur = ActiveSheet.Name


' Mettre ici ta macro


' Mettre les 2 lignes ci-dessous à la fin de ta macro
Sheets(FeuilleUtilisateur).Activate
End Sub

 

[adam75]

Re : Macro pour aller sur la feuille active

Comme toujours je suis

Merci enormément à vous ça marche super bien et merci pour la rapidité de vos réponses.