PDA

View Full Version : Solved: Make Word Work



JustJerry
03-28-2005, 05:21 PM
Hello Everyone :hi:

I am working with a somewhat simple database, and have stumbled into a problem by trying to make Word work from Access correctly. Here are my details:

Using the 'Publish with Word' button in Access does not correctly display the data I wish to display correctly.
I then created a Word template to use the Mail Merge, linking my 'source' to my access table. Problem is that on my Access Report, I do some complex calculations with the data fields that do not get stored in the table itself, and therfore I don't have access to that using my Mail Merge. Word can not perform the calculations I need either.
I then discovered that if I first export my Access report to an Excel file, and use that file as my 'source' for my Word template, all the data is there that I need, including the calculated values done on the Access Report itself.
If I open up the template using Word, I get the prompt telling me that "opening this document will run the following SQL command...etc.", and the template opens up as a new document displaying the updated data I just exported to Excel from Access.
I created a command button in Access to do the export to Excel, and this works fine.
I then created a command button in Access to try and open up the Template using Word, and this is what does not function right. Word does open, and the template does open, but it opens as the template and not as a new document. Nor do I get the MsgBox telling me that the opening the file is going to run the SQL command. The data displayed will be the data from when I last ran the template file from Word itself. If I first do an Export to Excel, and then click on the Access button to open up the template, that new data is not displayed.
Using the Hyperlink to open the template does not correct this 100% either. It does open the file, it does update the data from excel, but it opens the file as a template (.dot) instead of as a new document (.doc). I must use the Save As so not to overwrite the .dot template file. This is ok for me, but will be confusing to other users of this program.
Here is the VBA code I tried to use first:


Private Sub OpenWordSDCalc_Click()
On Error GoTo Err_OpenWordSDCalc_Click

Dim LWordDoc As String
Dim oApp As Object

'Path to the word document
LWordDoc = "C:\PathCalc\Main Calc Merge Document.dot"

If Dir(LWordDoc) = "" Then
MsgGox "Document not found."

Else
'Create an instance of MS Word
Set oApp = CreateObject("Word.Application")
oApp.Visible = True

'Open the Document
oApp.Documents.Open FileName:=LWordDoc
End If

Exit_OpenWordSDCalc_Click:
Exit Sub

Err_OpenWordSDCalc_Click:
MsgBox Err.Description
Resume Exit_OpenWordSDCalc_Click

End Sub

If anyone has ANY suggestions or help, I would greatly appreciate it.

Thank you,

Jerry :dunno

mdmackillop
03-28-2005, 06:38 PM
Hi Jerry
Welcome to VBAX

Have a look at the item here.
http://www.vbaexpress.com/kb/getarticle.php?kb_id=290
It is easiest to open a mailmerge document as a doc file, and this can be done with a FollowHyperlink line. As this is merged to a new document in any case, there is no advantage in opening the template. The KB item simply creates the new document when it is opened, with an option for saving to a location specified by datasource fields.

JustJerry
03-29-2005, 09:10 AM
Thank you for the reply. I will check out your suggestion and see how that works :friends:

JustJerry
04-07-2005, 06:01 PM
Just wanted to let you know that my issue with Word is resolved, and that I appreciated your input very much:beerchug: .

Jerry

Norie
04-08-2005, 07:23 AM
Jerry

How have you resolved it?

Did you use the Add method of the Documents coolection rather than Open?