Lien hpertext

Stefan_matlos · 24 Août 2007

Bonjour a tous et a toutes,

Voila mon petit souci,

J ai un formulaire , nommé suivi devis, renseigné par des textbox et qui alimente une sheet nommé suivi devis, je voudrais que la valeur de la textbox1 soit également un lien hypertext suivant le chemin ou le devis a ete enregistre.
un bouton de commande me permets avant de renseigner la feuille suivi devis d'enregistrer le devis sous c:\devis\"txtbox1.value"

Par exmple j enregistre mon devis 2001232 suivant ce chemin(ci dessus) et lorsque je valide le formulaire suivi devis, je souhaiterais qu automitiquemet dans la feuille suivi devi, la cellule ayant la valeur 2001232 ouvre par lien hypertext le fichier c:\devis\2001232 et ainsi de suite pour tout les enregistrements.
par avance merfci

MichelXld · 26 Août 2007

Re : Lien hpertext

bonjour

Tu peux utiliser cette syntaxe

Code:

Private Sub CommandButton1_Click()
    'Crée un lien hypertexte dans la cellule A1 de la
    'feuille "suivi devis".
    With Worksheets("suivi devis")
        .Hyperlinks.Add Anchor:=.Range("A1"), Address:="C:\devis\" & TextBox1 & ".xls"
        .Range("A1").Hyperlinks(1).TextToDisplay = TextBox1
    End With
End Sub

Bonne journée
MichelXld

Lien hpertext

Stefan_matlos

Guest

MichelXld

XLDnaute Barbatruc

Discussions similaires

Lien hpertext

Stefan_matlos

Guest

MichelXld

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency