Accéder à des onglets masqués (EXCEL 2013) [Résolu/Fermé]

Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
- - Dernière réponse : via55
Messages postés
11210
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
19 octobre 2019
- 7 déc. 2015 à 18:02
Bonjour à tous,

Je cherche à accéder à des onglets masqués par le biais de lien hypertexte ... Je m'explique :

Étant courtier en Assurances, je travaille avec plusieurs compagnies d'assurances en Complémentaire Santé. J'ai réussi à regrouper tous les tarifs des compagnies sur un seul fichier EXCEL. Ce qui fait que désormais lorsque je tape les dates de naissances cela me donne les tarifs en fonction des âges et en fonctions des compagnies.
J'ai aussi créer des onglets pour chaque tableau de garanties de chaque compagnie. 1 feuille = 1 tableau de garantie

J'ai créé plusieurs "boutons" avec des liens hypertextes vers chaque feuille de mon classeur. Mais le problème c'est que lorsque que je masque les différentes feuilles, je n'y ai plus accès via les boutons créés précédemment ... J'ai vraiment besoin que ces feuilles soit masquées afin d'éviter d'avoir beaucoup d'onglets.

Je n'y connais strictement rien en VBA etc... donc si vous pouviez me guider et m'aider dans ma démarche.

Vous en remerciant par avance
Afficher la suite 

3 réponses

Meilleure réponse
Messages postés
11210
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
19 octobre 2019
1458
3
Merci
Bonjour

Pour procéder en VBA il ne faut pas utiliser un lien hypertexte associé à une forme comme tu as du le faire, il faut créer un vrai bouton (Onglet Developpeur - Inserer - Contrôle Active X et choisir l'icone bouton et le placer sur la feuille
Ensuite clic droit sur le bouton et visualiser le code, l'editeur VBA s'ouvre et dans la page tu as
Private Sub CommandButton1_Click()
End Sub

Entrer les lignes de macro suivantes :
Private Sub CommandButton1_Click()
Sheets("Feuil2").Visible = True ' REMPLACER Feuil2 par le nom de la feuille à démasquer et à activer dans ces deux lignes
Sheets("Feuil2").Activate
End Sub


puis fermer l'éditeur VBA

Ensuite tu affiches cette feuille masquée et clic droit sur l'onglet avec le nom de la feuille puis visualiser le code et dans la page blanche de l'éditeur tu colles la macro suivante :
Private Sub Worksheet_Deactivate()
Sheets("Feuil2").Visible = False ' REMPLACER Feuil2 par le vrain nom de la feuille
End Sub


ce code a pour but de remasquer la feuille dès qu'on la quitte

Cdlmnt
Via

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 64089 internautes nous ont dit merci ce mois-ci

Le_Maniouk
Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
89 -
Merci je vais tester et te redis quoi =)
Le_Maniouk
Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
89 -
Un TRES TRES GRAND Merci ! Ca marche parfaitement !
Le_Maniouk
Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
89 -
Et pour faire un enregistrer sous en un clique ? =)
via55
Messages postés
11210
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
19 octobre 2019
1458 > Le_Maniouk
Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
-
Bonsoir,

Plutôt que par double-clic c'est plus évident de mettre un bouton et comme code associé au bouton mettre
Application.Dialogs(xlDialogSaveAs).Show

qui ouvre la boite de dialogue Enregistrer sous
Messages postés
50083
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
19 octobre 2019
10954
0
Merci
Bonjour Le_Maniouk

"J'ai vraiment besoin que ces feuilles soit masquées afin d'éviter d'avoir beaucoup d'onglets" : Peux-tu justifier ce besoin ?
Tes onglets principaux étant au début, cela ne devrait pas te perturber qu'il y en aie plein d'autres ...

Cordialement.
Le_Maniouk
Messages postés
322
Date d'inscription
lundi 25 mars 2013
Statut
Membre
Dernière intervention
20 septembre 2019
89 -
Car il n'y a pas que les tarifs pour la santé mais aussi pour l'obsèques la dépendance etc ...
-4
Merci
Bonjour,cela peut etre fonctionner je travail avec Excel 2007 et lorsque je l'ouvre il y a des onglets sous L'onglet acceuil complletement à droite il y a le mot FORMAT click sur la flèche et tu as un menu déroulant trouve VISIBILITE met la sourie dessus et trouve "afficher la feuille".
Bonne chance mais je ne suis pas certaint pour 2013 si c'est la meme procédure.
Bonne Journée