Hello, I am using the following code to open and WORD document on my
computer. However I need to send it to a bunch of people and although the
files will be place in a central location, the path that I'm using isn't
accurate for their machines.

How can I change the code to look for each individual document (named the
same as on my computer) and update the path?

Private Sub CommandButton1_Click()
Dim wd As Object
Set wd = CreateObject("Word.Application")
wd.Visible = True
wd.Documents.Open ("C:\Documents and Settings\BOB
REYNOLDS\Desktop\Forms-Letters-COJ\Letters & Merge Data\L01 Appointment
Letter 06282004.doc")
End Sub

The new folder will be on the desktop, but someone else's name.
Thanks so much
Bob Reynolds