hyperlink userform

Status
Niet open voor verdere reacties.
T

ThomasGHI

Gebruiker
Lid geworden
1 feb 2019
Berichten
37
Wie kan mij hierbij helpen?

Ik wens een hyperlink toe te voegen aan een image in mijn userform.
De bedoeling is dat er steeds een hyperlink aangemaakt wordt ad.h.v. de gegevens van de textboxen op het userform formulier.

vb. textbox1 bevat de waarde testpersoon1
Textbox 2 bevat de waarde demo
textbox3 bevat de waarde testfile
textbox4 bevat de waarde .pdf

De locatie waar dit steeds bewaard is steeds c:\

er zou dus een link moet aangemaakt worden naar locatie c:\testpersoon1\demo\testfile.pdf

Door dan op de image te klikken zou het bestand testfile.pdf moeten kunnen opengaan.
 
Laatst bewerkt:
Zo is niet duidelijk wat nu waar staat. textbox2 en textbox2?
Welke image?
Plaats een voorbeeld document.
 
zoiets:

Code: 
Private Sub Image1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    On Error Resume Next
        ActiveWorkbook.FollowHyperlink "c:\" & TextBox1.Text & "\" & TextBox2.Text & "\" & TextBox3.Text & TextBox4.Text
    On Error GoTo 0
End Sub

++
Kom er net achter dat Click en DoubleClick niet meer standaard getoond worden in nieuwe Excel-versies, (wel verborgen)
Code: 
Private Sub Image1_Click()
werkt dus ook.
Maar als het toch om klikken gaat, kun je net zo goed een button gebruiken (met een plaatje)
 
Laatst bewerkt:
heb dit ingevoerd in mijn userform en de juiste textboxen geselecteerd, folder en bestand aangemaakt.
Maar bij het klikken op het figuur gebeurt er niets.

HTML: 
Private Sub Image3_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    On Error Resume Next
                
        ActiveWorkbook.FollowHyperlink "c:\" & TextBox1.text & "\" & TextBox9.text & "\" & TextBox3.text & TextBox5.text
        
    On Error GoTo 1
End Sub

2019-02-08_12h16_07.png
2019-02-08_12h19_37.png
 
Haal die On Error Resume Next eruit en ook die On Error GoTo 1.
Dan zie je tenminste wat er mis gaat.
En plaats geen plaatjes maar je document of een relevant voorbeeld er van.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan