[Astuce] Déplacement rapide entre onglets

Un petit bout de code pour afficher une boîte de dialogue pour naviguer

entre les feuilles visibles d'un classeur.

Sub BarreAccesFeuilles()
    Application.CommandBars("Workbook tabs").ShowPopup 400, 300
End Sub

Mytå

Absolument GEANT !

Je galérais avec un classeur de plusieurs feuilles ayant deux cellules figées à gauche, et du coup j'avais du mal à accéder à la zone permettant de changer d'onglet...

Merci Mytå.

Tu vois, j'ai même cherché le petit a avec un petit rond au dessus...

Si tu en as d'autres des astuces comme celles-là, elles sont tout à fait bienvenues...

Elbie

j'ai une question: ou met-on le code?

C'est une de mes failles sur excel, je sais créer des macros et des boutons mais pour des bouts de code comme celui-ci, je ne sais pas où les inserer....

Pourrais tu m'éclaircir?

Merci d'avance

Souri84

Re salut,

Juste pour dire qu'il n'y a pas besoin de ce code pour obtenir cette popup....

si tu cliques droit sur les flèches de navigation des onglets, elle apparaît aussi.... et sans entrer le code....

Salut le forum

Souri84 oui tu as raison, mais à condition de ne pas être en mode plein écran, car là

tu n'as plus les flèches de navigation.

Mytå

P.S. Pour le code tu peux l'associé à un bouton de ta feuille

Private Sub CommandButton1_Click()

Application.CommandBars("Workbook tabs").ShowPopup 400, 300

End Sub

c'est clair que c'est plus pratique avec un bouton....

Il y a encore plus facile.. le racourcis clavier Ctrl + page up ou page down.