Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
Vieux 06/02/2010, 19h44   #1
Candidat au titre de Membre du Club
 
Inscription : janvier 2010
Messages : 26
Détails du profil
Informations forums :
Inscription : janvier 2010
Messages : 26
Points : 11
Points : 11
Par défaut Retourner à la derniere feuille sélectionné

Bonjour encore le forum.

Cette fois-ci mon problème, est comment je pourrais faire pour retourner à la derniere feuille après avoir complété une macro qui m'ammène sur une autre feuille.

J'ai une petite idée personnelle, mais je ne suis pas capable de creer une variable que je pourrais aller chercher peu importe quel feuille est active.

exemple :
Code :
1
2
set AA = activesheet
worksheets("sheet1").range("A1") = AA
ensuite ma derniere feuille serait en A1, ma ca ne fonctionne pas =P

donc votre aide est la bienvenue et merci encore !
p0l1n est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 06/02/2010, 20h27   #2
Expert Confirmé Sénior
 
Avatar de Qwazerty
 
Homme Stéphane
La très haute tension :D
Inscription : avril 2002
Messages : 2 431
Détails du profil
Informations personnelles :
Nom : Homme Stéphane
Âge : 31
Localisation : France

Informations professionnelles :
Activité : La très haute tension :D
Secteur : Service public

Informations forums :
Inscription : avril 2002
Messages : 2 431
Points : 4 042
Points : 4 042
Envoyer un message via MSN à Qwazerty
Salut
Tu peux déclarer une variable de porté module, donc dans un module tu mets
Code :
Public LastSheet as worksheet
Au début de ta macro tu mémorises dans cette variable la feuille active
Code :
Set LastSheet = ActiveSheet
Et quand tu veux afficher l'ancienne sheet tu veux
A++
Qwaz
__________________

MagicQwaz := Harry Potter la baguette en moins
Le monde dans lequel on vit
HammerFest
Score PowerBall Gyroscope Green : 11847
Qwazerty est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 06/02/2010, 22h08   #3
Candidat au titre de Membre du Club
 
Inscription : janvier 2010
Messages : 26
Détails du profil
Informations forums :
Inscription : janvier 2010
Messages : 26
Points : 11
Points : 11
wow un gros merci pour la réponse rapide et clair !
p0l1n est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 06/02/2010, 22h48   #4
Expert Confirmé Sénior
 
Avatar de Qwazerty
 
Homme Stéphane
La très haute tension :D
Inscription : avril 2002
Messages : 2 431
Détails du profil
Informations personnelles :
Nom : Homme Stéphane
Âge : 31
Localisation : France

Informations professionnelles :
Activité : La très haute tension :D
Secteur : Service public

Informations forums :
Inscription : avril 2002
Messages : 2 431
Points : 4 042
Points : 4 042
Envoyer un message via MSN à Qwazerty
De rien
Petit plus pour éviter une erreur
Code :
if not LastSheet is nothing then LastSheet.activate
A++
Qwaz
__________________

MagicQwaz := Harry Potter la baguette en moins
Le monde dans lequel on vit
HammerFest
Score PowerBall Gyroscope Green : 11847
Qwazerty est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +1. Il est actuellement 15h10.


 
 
 
 
Partenaires

Hébergement Web