Open a Doc with VBA

[katekaew]

I have a list box contained the subjects, a button to click when a particular subject has been selected.
On_click(), this button will call Microsoft-Word which will open a particular MS-Word file. Each user can see and manage only their file.
How to write the VBA code to manipulate this task?

 

[Oldsoftboss]

Try this.....

 

[katekaew]

I forgot to say that each user can see and manage only their file. I tried the following code:

Private Sub cmdReview_Click()
Call Get_User() 'To check if the particular user has a permission to review this file

'Open doc
Dim objWD As Word.Application
On Error GoTo Files_Click_Err
Set objWD = CreateObject("Word.Application")
objWD.Documents.Open ("F:\Assessment\01.doc")
objWD.visible = True

Set objWD = Nothing

Files_Click_Exit:
Exit Sub

Files_Click_Err:
MsgBox Err.Number & " - " & Err.Description
Resume Files_Click_Exit
End Sub

When Word has been loaded there is a dialog box said that it's opened by myself already. See attached.

 

[maxmangion]

you can try opening the file by

Application.FollowHyperlink "FileNamePathGoesHere"

 

[katekaew]

It works well now.

Thank you so much.

 

[maxmangion]

you're welcome

 

[ghudson]

Check out the OpenFile function in my Browse [Find a directory or file] sample. It will allow you to select any file and open it using the ShellExecute API.