Need help with printing a form

[bobh]

Hi All,
A clients database (built by another and not very well but, its what I
have to work with) has bound forms that display customer information
and when printed is three pages long. The information on page 3 is set
to screen display only. When printing it prints 3 pages with the last
page being a blank page. I have tried to surpress the third page by
putting a print button on the form and adding the vba code -
Docmd.Printout acPages, 1, 2 which does Not work.

The Docmd.Printout acPages, 1, 2 actually prints page 1 and 2 of
record 1, not the currently displayed records, which I don't
understand. Again, the form is a bound form and so the user uses the
record selector to go to the record of choice and then wants page 1 and
2 of the displayed record printed.

I have tried several things and can't seem to find the right
combination to get it working correctly, I've tried such things like
Me.Refresh
Docmd.Printout acPages, 1, 2 'print page 1 and 2 of record 1 not
currently displayed record

Me.Requery
Docmd.Printout acPages, 1, 2 'print page 1 and 2 of record 1 not
currently displayed record

DoCmd.RunCommand acCmdSelectRecord
DoCmd.PrintOut acSelection 'still prints third page which is blank

DoCmd.RunCommand acCmdSelectRecord
Docmd.Printout acPages, 1, 2 'print page 1 and 2 of record 1 not
currently displayed record

So, how do I get Only page 1 and 2 of the current record that's being
displayed on the screen printed???

thanks
bobh.

[pietlinden]

print to a report that looks like the form, and set the filter property
to the current record on the open form you're printing from.

Forms are for entering data, not printing. That's part of why you're
having the problem.

[Rick Wannall]

Save the form as a report and format the report to print nicely. I have
only very rarely seen it successful to do printing with a form instead of a
report. You'll waste more time trying to pull it off than it could ever
take to do a simple report. And the report will look a hundred times
better.

On your form, add a button, cmdPrintMe. Assuming the txtPrimaryKey is bound
to whatever your primary key field is, you print like this:

docmd.openreport MyNewReport, , , "MyPrimaryKeyField=" & Me.txtPrimaryKey

Just my opinion, of course.

[bobh]

pi********@hotmail.com wrote:

print to a report that looks like the form, and set the filter property
to the current record on the open form you're printing from.

Forms are for entering data, not printing. That's part of why you're
having the problem.

Wish I could but, there are 10 of these forms, each one being very
loaded with controls, I'd have to create 10 reports which I don't
think this client would be willing to pay me for doing.
Thanks
bobh.

[bobh]

Rick Wannall wrote:

Save the form as a report and format the report to print nicely. I have
only very rarely seen it successful to do printing with a form instead of a
report. You'll waste more time trying to pull it off than it could ever
take to do a simple report. And the report will look a hundred times
better.

On your form, add a button, cmdPrintMe. Assuming the txtPrimaryKey is bound
to whatever your primary key field is, you print like this:

docmd.openreport MyNewReport, , , "MyPrimaryKeyField=" & Me.txtPrimaryKey

Just my opinion, of course.

Wish I could but there are 10 different forms which would mean 10
different reports. Unfortunately I can not do one generic report as the
form are that different from each other and I don't think this (new to
me) client would want to pay me to create 10 reports just to surpress a
blank page from printing.
thanks for your suggestion
bobh.

[Rick Wannall]

Very likely that he will wind up paying you much more to try to make forms
act like reports, which they are not very good at.