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 (permalink)
Candidat au titre de Membre du Club
 
Date d'inscription: janvier 2010
Messages: 24
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 :
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
Vieux 06/02/2010, 20h27   #2 (permalink)
Expert Confirmé
 
Avatar de Qwazerty
 
Date d'inscription: avril 2002
Localisation: (03) - Allier - Chez les fous ^^
Âge: 29
Messages: 1 521
Envoyer un message via MSN à Qwazerty
Par défaut

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
Code :
LastSheet.activate
A++
Qwaz
__________________

MagicQwaz := Harry Potter la baguette en moins
Le méchant Qwaz sur Msn ... inutile de me rajouter sur msn pour que je fasse votre boulot (les concernés sont au courant, les autres relax )
Le monde dans lequel on vit
HammerFest
Score PowerBall Gyroscope Green : 11847
Qwazerty est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 06/02/2010, 22h08   #3 (permalink)
Candidat au titre de Membre du Club
 
Date d'inscription: janvier 2010
Messages: 24
Par défaut

wow un gros merci pour la réponse rapide et clair !
p0l1n est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 06/02/2010, 22h48   #4 (permalink)
Expert Confirmé
 
Avatar de Qwazerty
 
Date d'inscription: avril 2002
Localisation: (03) - Allier - Chez les fous ^^
Âge: 29
Messages: 1 521
Envoyer un message via MSN à Qwazerty
Par défaut

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 méchant Qwaz sur Msn ... inutile de me rajouter sur msn pour que je fasse votre boulot (les concernés sont au courant, les autres relax )
Le monde dans lequel on vit
HammerFest
Score PowerBall Gyroscope Green : 11847
Qwazerty est déconnecté   Envoyer un message privé Réponse avec citation
NEWS EXCELF.A.Q EXCELTUTORIELS EXCELSOURCES EXCELOUTILS EXCELLIVRES EXCELOFFICE 2010

Réponse Proposer ce sujet en actualité

Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel



Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are non
Pingbacks are non
Refbacks are non



Fuseau horaire GMT +1. Il est actuellement 08h21.


Vos questions techniques : forum d'entraide Excel - Publiez vos articles, tutoriels et cours
et rejoignez-nous dans l'équipe de rédaction du club d'entraide des développeurs francophones
Nous contacter - Hébergement - Participez - Copyright © 2000-2010 www.developpez.com - Legal informations.