www.forumsmc.com

Hello la communauté,
J'ouvre ce post pour avoir de l'aide sur Excel et pour que chacun puisse y faire des demandes pour excel.

Pour le cas qui m'interesse, j'ai un fichier Excel auquel j'ai mis une page d'accueil avec des boutons. Il y a 29 Boutons qui réprésentent une tournée de facteur, qui sont tous en double.
Les boutons d'une meme tournée sont l'un au dessus de l'autre.

J'aimerais créer une macro pour faire ceci:

1- Quand je clique sur le bouton du haut, cela m'imprime la tournée en question
2- Quand je clique sur le bouton du bas, cela m'ouvre l'onglet correspondant à la tournée, une sorte de raccourcis.

Mon fichier excel contient donc l'onglet Accueil et 29 onglets pour chaque tournées.

Merci de votre aide

Merlin

29 tournées...

Pourquoi tu crées un sujet, y'a déjà le sujet "énigmes".

En plus, la tienne est trop dure.

Viendez m'aider au lieu de ne rien faire avec ce temps pourri

Alors y a ça mais c'est pas des boutons.

Merlin, tu vas me faire le plaisir d'aller payer la licence du Excel que tu utilises frauduleusement depuis des années. Bill Gates te remercie.

Je ne répondrai pas parce que :
- c'est Microsoft©® Excel©® et pas OpenOffice.org
- Excel n'est pas du tout fait pour ça (même si ça marche bien sûr)
- En utilisant le mode "enregistrer une macro" tu trouveras tout seul la solution
- J'suis au boulot

J'suis gentil, hein ?

merlinenchant a écrit :2- Quand je clique sur le bouton du bas, cela m'ouvre l'onglet correspondant à la tournée, une sorte de raccourcis.

Je ne vais peut être pas t'avancer à grand chose car je ne suis pas sur, m'enfin tu peux toujours essayer, j'ai pas le temps de rouvrir des anciennes appli que j'avais d'ores et déjà faite pour vérifier...

Il me semble qu'en VBA excel, le "raccourci" pour aller à l'"onglet" correspondant (soit la feuille) s'appelle SHEETS, soit

sheets("nom_de_ta_feuille")

toox a écrit :- En utilisant le mode "enregistrer une macro" tu trouveras tout seul la solution

+1

J'ai fini par trouver comment faire.



Sub ACD1()
Sheets("BI 1").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Accueil").Select
End Sub
Cela permet d'imprimer la page du classeur nommé BI 1 et de revenir à la page d'accueil.

Sheet permet bien de faire un raccourci.

Ouf... J'aime les histoires qui se finissent bien.

j'ai aussi des histoires droles.