Hyperlien VBA Cells ()

Giancountry Messages postés 11 Statut Membre -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

je cherche à créer des hyperliens invisibles en chaine d'une feuille à une autre. Concrètement, il s'agirait que lorsque je clique sur A1 dans la feuille 1, j'arrive sur B1 dans la feuille 2; A2, B2,.....

Par ailleurs, car je l'intègre dans du code déjà existant, j'ai al contrainte d'utiliser "cells( ) pour me référer aux cellules et non range.

Je ne trouve pas la synthaxe de création d'un hyperlien avec "cells" sur le web. Pouvez-vous m'aider?

Merci,

Gianni

1 réponse

eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonjour,

A mettre dans le code de Feuil1 :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    If Target.Column = 1 Then 
        With Worksheets("Feuil2") 
            .Activate 
            .Cells(Target.Row, 2).Select 
        End With 
    End If 
End Sub

Par ailleurs, car je l'intègre dans du code déjà existant, j'ai al contrainte d'utiliser "cells( ) pour me référer aux cellules et non range.
Non, tu peux utiliser ce que tu veux, c'est selon le besoin.

eric
0