lien hypertexte

[lyahyaii]

salut
Comment je peux créer bouton renvoyant vers lien hypertexte

 

[Staple1600]

Bonsoir le fil, le forum

Question déjà posée
Réponse déjà donnée
https://www.excel-downloads.com/threads/lien_hypertexte.20021985/

 

[lyahyaii]

Sub Macro7()
'
' Macro7 Macro
'

'
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
"Créer%20exsompel.xlsm", TextToDisplay:="Créer exsompel.xlsm"
Range("C8").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub

 

[lyahyaii]

Private Sub CommandButton1_Click()
ThisWorkbook.FollowHyperlink "1%20-%20Copie.xlsm#Feuil1!A1"
End Sub