Userform label (verwijzing naar bijlage) button

[carloschouw]

Hoi,

Ik heb in een userform een button toegevoegd om een 'bijlage' te selecteren. De verwijzing naar de bijlage wordt via een pad toegevoegd via een label middels de volgende code:

Private Sub CommandButton10_Click()

Dim myfilepath As String
myfilepath = Application.GetOpenFilename()
Label1.Caption = myfilepath

End Sub

Dit werkt prima echter nu wil ik met een andere button de bijlage kunnen bekijken. Ik dacht het met de volgende code te kunnen maar ik kom er niet zo goed uit, het werkt n.l. niet:

Private Sub CommandButton11_Click()

 If Trim(Me.Label1.Value) = "" Then
 Me.Label1.SetFocus
 MsgBox "Geen bijlage weer te geven"
 Exit Sub
 End If

  ThisWorkbook.FollowHyperlink Me.Label1.Value
  
End Sub

Heeft iemand een idee hoe ik het wel voor elkaar kan krijgen?

 

[edmoor]

Een Label heeft geen Value attribuut.
Maak daar Label1.Caption van.

Tenslotte is dat ook waar je de gegevens hebt geplaatst.

 

[carloschouw]

Hoe simpel kan het zijn

Aangepast en het werkt perfect!

Mijn dank is groot!