Hi Eric
I have just looked at Alberts RunWord module and if it opens word ok then it
would seem (I may be wrong) that the problem is not with the code. Have you
you moved the location of the word docs ? It is prob the onclick action (or
other event) you are using.
Try this - Create a button on you form (call it cboWord)
Private Sub cboWord_Click()
Me.Requery
Dim strSql As String
strSql = "select * from InertQueryNameHere where PrimaryFeldInQuery = " &
Me!ContolNameHoldingPrimaryField
MergeAllWord strSql, "LocationOfWordFiles"
End Sub
Change these in the code above
InertQueryNameHere
PrimaryFeldInQuery
ContolNameHoldingPrimaryField
LocationOfWordFiles
With the above I assume you are basing your form on a query. If your are
using a table then - InertQueryNameHere - would be InertTableNameHere
Note if you have multiple locations for your word docs (so that you can
merge different letters from different forms - or even different letters from
the same form using different buttons - or more likely an option group) -
LocationOfWordFiles - is the name of the folder holding these word docs.
Looking at Albert excelent code you would need this method or you will hve a
complete list of word docs each time you "click" and this could be a "very"
big list.
Hope this helps