création automatique de lien hypertexte

[Tail]

bonjour
j'ai un fichier ave une liste de nom lorsque je rajoute un nom, je double clique dessus et ça me creer une nouvelle feuille qui se renomme auto avec le nom.
j'aimerai ensuite que le nouveau nom se transforme en lien hypertexte pour me rediriger sur sa feuille.
je ne sais pas si je suis clair
merci de votre aide

 

[pascal21]

Re : création automatique de lien hypertexte

Bonsoir
iCe lien n'existe plus la méthode pour créer des liens hypertexte
après si c'est de façon automatique que tu souhaites cela, il faudra, je pense passer par des macros

 

[BOISGONTIER]

Re : création automatique de lien hypertexte

Bonsoir,

Lien_Hypertexte("[nomClasseur.xls]'nomOnglet'!cellule";"TexteAffiché)

Les liens hyper-textes

JB

 

[Tail]

Re : création automatique de lien hypertexte

re
je ne sais pas si j'ai bien compris.
j'ai ce code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("b:b")) Is Nothing Then
If Selection = "" Then Exit Sub
Dim Ws As Worksheet
For Each Ws In Worksheets
If Ws.Name = Target Then MsgBox "Ce nom de feuille existe déjà !": Exit Sub
Next Ws
Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = Target
Sheets("zzz vierge").Cells.Copy
Sheets(Worksheets.Count).Paste
Application.CutCopyMode = False
ActiveSheet.Range("A1").Select
End If
end sub

et j'aimerai que le nom ou j'ai double cliqué se transforme en lien hypertexte en correspondance avec la nouvelle feuille qui porte son nom

je cherche de mon coté, merci de votre aide

merci

 

[Tail]

Re : création automatique de lien hypertexte

j'ai mis ajouté ce code :

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"" & Target & "!Lancer_la_requête_à_partir_de_CATALOGUE_HABILLEMENT_2004_2"

mais j'ai une erreur " reference non valide"

merci

 

[Tail]

Re : création automatique de lien hypertexte

bonjour
aprés beaucoup de recherche je ne trouve toujours pas, je compte sur vous
merci

 

[pascal21]

Re : création automatique de lien hypertexte

bonjour
avec le lien donné par boisgontier (que je salue et remercie pour l'aide qu'il me donne de temps en temps), j'ai trouvé ce code qui contourne un peu ton projet mais qui au final reviens au même
tu crée ta nouvelle feuille, tu l'as nomme et et le lien se construit automatiquement

Private Sub Worksheet_Activate()
          Range("C6").Select
          Range(ActiveCell, [C65000].End(xlUp)).ClearContents
          For i = 2 To Sheets.Count
             nf = Sheets(i).Name
             ActiveSheet.Hyperlinks.Add Anchor:=Selection,          Address:="", SubAddress:="'" & _
               nf & "'" &          "!A1", TextToDisplay:=nf
            ActiveCell.Offset(1, 0).Select
          Next i
        End Sub

à essayer

 

[Tail]

Re : création automatique de lien hypertexte

merci beaucoup pour l'aide, mais hélas je ne comprend pas et je n'arrive pas à le mettre dans mon code

voici mon code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("b:b")) Is Nothing Then
If Selection = "" Then Exit Sub
Dim Ws As Worksheet
For Each Ws In Worksheets
If Ws.Name = Target Then MsgBox "Ce nom de feuille existe déjà !": Exit Sub
Next Ws
Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = Target

Sheets("zzz vierge").Cells.Copy
Sheets(Worksheets.Count).Paste
Application.CutCopyMode = False
ActiveSheet.Range("A1").Select
End If
Sheets("zzz liste agents").Activate

' ici la ligne pour ajouter le lien hypertexte, mais génére un code erreur " référence non valide"

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"" & Target

 

[Tail]

Re : création automatique de lien hypertexte

bonsoir
apparement je ne suis pas le seul à ne pas trouver.

 

[pascal21]

Re : création automatique de lien hypertexte

bonsoir
le code que j'ai proposé n'est pas à ajouté au tiens
il fait tout seul la liaison entre la nouvelle feuille et la création du nouveau lien
je pensais que tu avais compris désolé!!
ou alors je n'ai pas compris ce que tu voulais faire
tiens je t'envoie le classeur précédent avec une légere modif (création de la nouvelle feuille)

 

[Tail]

Re : création automatique de lien hypertexte

merci à tous , grace à vous j'ai pu faire quelque chose qui fonctionne.
Maintenant j'ai une autre question que je remet sur le forum
merci