Printing a form

[l8poulse]

I've created a tabbed form that I'm using for auditing purposes. When the form is complete I want the user to print off a copy off the form showing all the fields. I've not had sucess with this and so my next option would be once the form is completed, the user would click a print button where a macro would be built in the back end that would export the contents to a report and print the report. When I try creating the report, I have too many fields. I would love to condense the fields by all must be displayed for review. Is there a way that I can export the contents to an Excel spreadsheet and print from there?

[maximus]

printing forms is not the general practice. Generally reports are printed. Regarding data to be exported to Xcel:

I have a Form connected to a table tbltech. i have a form with this table as the record source. when i click a button on the form the particular data on the form is exported on to an excel sheet.

the code is as follows:

Dim strSQL As DAO.QueryDef
Dim strdpSQL As String

strdpSQL = "Drop Table MyQuery"
On Error Resume Next
CurrentDb.Execute strdpSQL, dbFailOnError

Set strSQL = CurrentDb.CreateQueryDef("MyQuery", "Select * From tbltech Where techid=" & Me.techid)
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel8, "MyQuery", "C:\MyReport.xls", True

I First Create a Query using CreateQueryDef and the Use Docmd.TransferSpreadSheet to export the Data to an Excel Sheet called MyReport (C:\MyReports.xls). If you Look at the code carefully you will notice that I make sure that I drop the Query MyQuery before I run the SQL to Create the same. This is to eensuer that we get no error. I have used On error Resume Nsxt to prevent error when the code is run for the first time when MyQuery is not there.

If this solves your problem amrk the thread solevd. please let me know if you wil nedd any more help.