Hi all,

Scope:
I have a userform where I would like to add some buttons wich open certain
adobe PDF files. Furthermore, this project is to be burned on a CD so it can
be distributed.
My problem are the drive letters.. (diffrent systems, diffrent drive
letters..)

I have some code, but this is not working properly.. the errormessage is
that it cannot sustain(?) for a read only property.

________________________________________________
Private Sub CommandButton19_Click()
'open pdf file
Dim filelocation As String
ThisWorkbook.Path = filelocation
Sheets("UserSettings").Range("H3").Value = filelocation ' to view the
filelocation
'Shell "GetCurrentPath()V(S)F24-32-45.pdf"
End Sub
____________________________________

Does anyone has a suggestion how to solve this?
Thank you all!


--
Arjan Bregman
the Netherlands

*****
the knowledge is always there, maybe hidden, but it is there..
*****