crée lien internet

[petitclaude]

Bonjour à tous,
J’aurais voulu savoir si on pouvait
crée un lien Internet dans un USF
avec un Textbox
si oui comment
Merci du renseignement.

 

[Mytå]

salut petitclaude

J'aimerais bien t'aider mais le pro des UserForm c'est @Thierry

Tu devras attendre la fin Juin pour une reponse

Sinon moi j'ai pas trouver

Myta

 

[petitclaude]

Salut Myta

Merci quand même t'avoir essayer

j'attendrais fin Juin

@++ petitclaude

 

[Ti]

bah, pas besoin d'être un pro, c'est très simple, voici un exemple. C'est un label qui renvoie un lien :

Private Sub LabelLien_Click()
Dim Lien As String
Lien = "http://www.Excel-downloads.com"
On Error GoTo PasConnect
ActiveWorkbook.FollowHyperlink Address:=Lien, NewWindow:=True
Unload Me
Exit Sub
PasConnect:
MsgBox "Impossible d'ouvrir " & Lien
End Sub

 

[petitclaude]

Merci Ti du coup de main

Mais pour un débutant cela n'est pas évident.

@++