Lien hypertexte avec onglet masqué pour cibler un tableau

Olive93270 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
Olive93270 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je me permets de vous contacter car je suis un novice VBA et je me creuse la tête depuis quelques heures, j'ai donc décidé de venir demander de l'aide.

Onglet 1 : Feuille1 : index
Onglet 2 : Feuille2, tableau 1 nommé : TAB et tableau 2 : TAB2 (voir screen)



Sur la feuille 1, je souhaite créer un index.
- 1 Lien hypertexte pour afficher la feuille 2 et précisement le tableau 1 : TAB
- 1 Lien hypertexte pour afficher la feuille 2 et précisement le tableau 2 : TAB2

Ces onglets sont masqués, je dois donc passer par le VBA. De plus, je souhaite que lorsque l'on ouvre ces onglets, une fois consulter ou éditer, je souhaite qu'elles se masquent à nouveau.

Merci.
A voir également:

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Tu mets d'abord ton lien Hypertexte vers la feuille 2 en A1 de la feuille1.
Ensuite quand tu es sur la feuille 1 tu fais Alt F11 pour accéder à l'éditeur sur le module de la feuille 1.
Tu mets ce code dans ce module:

Option Explicit
Private Sub Worksheet_Activate()
Feuil2.Visible = xlSheetHidden 'masquée
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
Feuil2.Visible = xlSheetVisible 'visible
Feuil2.Select
End If
End Sub


Il te suffira de l'adapter suivant tes besoins, c'est un exemple simple!

@+ Le Pivert
0
Olive93270 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Cela fonctionne, un grand merci !
0