Lien automatique sur onglet

Re : Lien automatique sur onglet

Bonjour,


pour créer un lien hyper texte (j'ai utilisé l'enregistreur de macro)

For x = 1 To Sheets.Count 'boucle sur tous les onglets
Cells(x + 1, 1).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
Sheets(x).Name & "!A1", TextToDisplay:=Sheets(x).Name
Next x 'prochain onglet de la boucle


tu peux aussi associer un évènement



Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Len(Target.Value) <> 0 Then
Sheets(Target.Value).Select
End If
End Sub

Re : Lien automatique sur onglet

Merci pour la réponse.
Par contre je ne suis pas certain de comprendre ...
Peux-tu me le montrer dans mon fichier stp ?

Re : Lien automatique sur onglet

Bonjour,

Moi je ne comprends pas ce que tu ne comprend pas

j'ai mis à jour ta macro "Worksheet_Activate" + attaché le fichier sur le message précédent