Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Put report in word but maintain Access' report format

Status
Not open for further replies.

kporters

Programmer
Jan 11, 2002
21
US
I've created a report in Access, but want to publish it in word and maintina the Access Reports' format.

The report has calculated paragraph headings that don't stay the same when I try to export to .txt, .rtf or try to link it into word using the W icon in Access.
 
kporters - If the report does not need to be modified, I would suggest you save the report in the snapshot format.

The only problem is that whoever opens the report needs the snapshot viewer. This is free and you can download it on the microsoft website - I believe it may come with Access 2000 but I am not sure.

Hope that helps.

Fred
 
Unfortunately, the user getting the report will want to make changes
 
AS far as code goes I have :

Dim db as Database
Dim doc as Document

Set db = CurrenDb

For each doc in db.Continaers!Reports.Documents
if doc.Name = "Report" Then
DoCmd.OutputTO acOutputReport, "report", acFormatRTF, "C:\filename.rtf", true
else
outputreprt acpreview
end if
next doc

the problem is that i still get a preview of the report as well as an .rtf that has the wrong paragraph headers

any suggestions??
 
My latest attempt creates any report that is selected from the reports menu to be output as an .rtf. I want just one report to be ouput as an .rtf file and any other report that is selected to be previewed. any suggestions?

Dim db as Database
Dim doc as Document

Set db = CurrenDb

For each doc in db.Containers!Reports.Documents
If doc.Name = "RtfThisReport" Then
DoCmd.OutputTO acOutputReport, "RtfThisReport", & _
acFormatRTF, "C:\filename.rtf", AutoStart = True
Else
OutputReport AcPreview
End If
Next doc
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top