Access to Word Document

If you output an Access report to a PDF file, and then open the file in Word it will be converted to an editable version of the file, which can then be saved as a Word .docx file.  Images will be preserved in the .docx file.

For an illustration of how to output a report (invoice) as a PDF file  you might like to take a look at InvoicePDF.zip in my public databases folder at:

https://onedrive.live.com/?id=44CC60D7FEA42912%21169&cid=44CC60D7FEA42912

In this little demo file a button on the main invoices form outputs the current invoice report to a PDF file, which can be opened in Word and saved as a .docx file.

For an illustration of how to browse to a file in Access, and then open (or print where appropriate) the file in the default application for the file type, take a look at BrowseDemo.zip in my same OneDrive folder.  The file will not reflect any changes in the data in Access since the file was created.  For that you’d need to output the Access report to a PDF file again.Maxine14062 

Maxine14062 , you may also want to try to OutputTo your report to an RTF file (Word can read RTF file).

Unfortunately, you need to Reprint (OutputTo) again if you want to make changes to the source table.

Maxine14062 

Question: Why does it have to be Word? What is the intended purpose? If you don't want a PDF file, you are likely at a dead end.

If you indeed need a Word document, start with a Word document and import the data to be displayed. In simple cases, a merge document is fine, in complex export the data as an XML file. XML-Content-Controls allow you to display everything that a report can show, including subreports, in one document. Create them with the XML Mapping Pane in the hidden Developer tab.

But beware—this is an advanced topic. At some point, you will want to program in VBA and use XPath. Everything you can do manually can be done in code, but this is not true the other way around.

Example code for exporting a query from Access to Word:

Const WordFilePath As String = "Path to Word report doc"

Dim tmpXmlDataFile As String
tmpXmlDataFile = CurrentProject.Path & "\tmpReportData.xml"
ExportXML acExportQuery, "ReportQueryName", tmpXmlDataFile

Dim WordApp As Object
Set WordApp = CreateObject("Word.Application")

Dim doc As Object
Set doc = WordApp.Documents.Open(WordFilePath, ReadOnly:=False, AddToRecentFiles:=False, Revert:=True, Visible:=True, Format:=9)    ' wdOpenFormatXMLDocument=9
doc.CustomXMLParts.Add
doc.CustomXMLParts(doc.CustomXMLParts.Count).Load tmpXmlDataFile

WordApp.Activate