Modifier des liens hypertextes avec VBA

Question

Bonjour à toutes et à tous, j'ai créé dans une feuille nommée "Janvier" des liens hypertextes pour me rendre directement dans une cellule de cette même feuille.

Exemple : le lien de la cellule B5 me renvoie en cellule A1220.

J'ai dupliqué la feuille Janvier pour le mois de février.

Pour la feuille nommée Février, les liens hypertextes ont été conservés et renvoient à la feuille de janvier.

Il semble que seule une fonction VBA puisse me venir en aide afin de changer le nom de la feuille pour les liens

Merci à toutes et à tous pour votre aide

Mystique85

mikebzh · Answer

Coucou

Petite ruse sans lien hypertexte

En cliquant sur une case on va sur une autre

Je m'explique

Dans ta page d'origine mettons janvier

1. Tape un texte en "B5" (comme une donnée classique soulignée, en couleur etc....) ou pas (case fantôme )

2. Onglet developpeur/Visual basic choisi ta feuille dans vba projects ici janvier puis menu déroulant géneral/worksheets

normalement la fonction worksheet_selectionchange doit apparaitre dans la fenêtre de code puis tu tapes

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = Range("$B$5").Address Then
        Range("$A$1220").Activate
    End If
End Sub

Et voila, ensuite en copiant ta feuille la petite moulinette s'adapte et ne retourne pas voir la précédente page

Pour modifier ensuite le texte de ta cellule (ici "B5") n'oublie pas de passer en mode création

A plus