VBA Network filepath

[Neilster]

Hi Guys

I've touched on this topice previouly however to no avail, but I really need some help on this.

In the DB the user can click a button which opens up a word doc which is stored in a folder along with the DB. The DB is stored on a shared drive (Network) and will be used in different locations.

So I have tried the below code so that the button works on any PC and any Network but its not working, Please please help. :banghead: :banghead:

Dim sUsername As String
Dim filesPath As String

sUsername = Environ$("username")
filesPath = Environ$("USERPROFILE") & "\\" & "\\USER32\Users\Public\AdminFolder\Template.docx"

 

[CJ_London]

looks like you have too many backslashes. I would go to windows explorer, navigate to the location and copy the path, then compare with what you are creating

 

[Neilster]

Hi CJ

Thanks for getting back to me, explorer gives me this

\\User32\Users\Public\Adminfolder\Template.docx

 

[CJ_London]

so why do you need the environ values when they are not used (you are in a public directory as highlighted in red). All you should need is

filesPath = "\\USER32\Users\Public\AdminFolder\Template.docx"