Aide sur Fichier VBA

Bonjour le Forum,

j'ai un fichier qui contient un lien hypertexte en VBA qui revoi aux autres onglets, le fichier fonctionne parfaitement, exeption que lors de la sauvegarde si elle intervient dans les feuille de 1 &4 ces onglets affichent aussi les memes données de la page de garde dans la colonne B (1.2.3.4)

y'a t'il une solution pour que ces liens restent uniquement dans la page d'acceuil

Merci Beaucoup d'avance

3test-vba.zip (0.97 Mo)

Bonjour,

A l'ouverture du fichier tu executes la macro "Liens" où cette ligne

Sheets(1).Hyperlinks.Add Anchor:=Range("B" & Ligne), Address:="", SubAddress:="'" & Sheets(I).Name & "'!A1", TextToDisplay:=Sheets(I).Name

crée un lien en colonne B mais de la feuille active et pas de la feuille "accueil". Précise avant le range sur quelle feuille tu veux le lien :

Sheets(1).Hyperlinks.Add Anchor:=Sheets(1).Range("B" & Ligne), Address:="", SubAddress:="'" & Sheets(I).Name & "'!A1", TextToDisplay:=Sheets(I).Name

Cela devrait résoudre le pb

Bonne journée

Merci pour votre retour, désolé j'ai voulu reprendre le code mais ça marche pas , pouvez vous s'il vous plait copier le code sur le fichier

Merci Beaucoup

Voilà toute la macro "Liens"

Sub Liens()
Dim Ligne As Long
Dim I As Integer

  Application.ScreenUpdating = False
  If Range("B7") <> "" Then
    Range("B7:B" & Range("B" & Rows.Count).End(xlUp).Row).Clear
  End If
  Ligne = 7
  For I = 2 To Sheets.Count
    Sheets(1).Hyperlinks.Add Anchor:=Sheets(1).Range("B" & Ligne), Address:="", SubAddress:="'" & Sheets(I).Name & "'!A1", TextToDisplay:=Sheets(I).Name
    Ligne = Ligne + 1
  Next I
End Sub

++

Merci Beaucoup, impeccable

Rechercher des sujets similaires à "aide fichier vba"