BOUTON MACRO FERMETURE ET RETOUR

[FLANEUR]

et oui !!!j'suis déja de retour...:unsure:
d'abord,merci à MDF,MYTA ,LAW,PASCAL76 pour leur aide précieuse.
donc encore une egnime pour moi...

une page d'accueil contient plusieurs boutons (type navigation)
chaque bouton ouvre une feuille en accés ultra limité (merci à tous)
je voudrai créer un bouton retour (avec macro)qui revienne à
l'accueil et ferme la feuille lue sans enregistrement si modif..

je sais...j'exagere mais promis, sur la tete de lui
je ferai travailler mon neurone à la prochaine étape...
merci

 

[Law]

Bonjour Flaneur,
Bonjour le forum,

Voici une possibilité :

Sub RetourAccueil()

Application.ScreenUpdating = False

Worksheets(1).Select
'(Si ton accueil est la 1ère feuille du classeur, ce qui semble logique ;
'sinon tu remplaces le 1 par le numéro de feuille)
Application.ScreenUpdating = True

End Sub

La feuille lue n'est pas 'fermée', elle reste ouverte puisqu'elle fait partie intégrante de ton classeur qui est ouvert. Simplement, elle n'est plus la feuille active (le 'focus' est repassé sur la feuille 'Accueil')

@+

 

[flaneur]

désolé, mais j'ai oublié de dire que les feuilles ouvertes font parties d'autres classeurs !!

ouppps! :sick:

 

[Thorgalson]

Salut,
voici ce que je te propose:


ActiveWorkbook.Saved = True
'empeche la sauvegarde des modifs puisqu'EXCEL réagit comme si le doc venait d'être sauvegardé

ActiveWorkbook.Close

Workbooks('Nomdetonclasseur.xls').Activate
Sheets('Accueilounomdetafeuille').Select


@+