one big report

woodchuckwood

Registered User.
Local time
Today, 19:01
Joined
Jan 15, 2004
Messages
10
I use this cmd to generate my reports:

On Error Resume Next

Dim db As DAO.Database, doc As Document, con As Container
Set db = CurrentDb()
Set con = db.Containers("Reports")
For Each doc In con.Documents

DoCmd.OutputTo acOutputReport, doc.Name, "RichTextFormat(*.rtf)", "C:\test\" & doc.Name & ".doc", False, ""
Debug.Print doc.Name
Next

The one thing i need to do is to combine all of the rtf files into one Word document when the cmd is executed. Is this all possible through Access or do i have to start writing macros in Word? :confused:
 
wcw,

rebump ... no just kidding.

I don't think that you can do this. Since they are files, I think
that you have to Shell a DOS command to Copy/Append all
of the files into one new file.

Wayne
 
I'm not completely sure if appending will do the job...
if you read the RTF data it uses a '}' character to signify the end of the display area so appending data after that may not work
 

Users who are viewing this thread

Back
Top Bottom