print two reports at the same time

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Fred's - 10 Jan 2008 16:30 GMT

Is there a way to print two reports at the same time with a control
button?

The fist report have one side page and the second report have 2 side
page.

Thanking all in advance for your help!

Reply to this Message

Wayne-I-M - 10 Jan 2008 19:11 GMT

Private Sub ButtonName_Click()
DoCmd.OpenReport "Report1", acViewNormal, "", "", acNormal
DoCmd.OpenReport "Report2", acViewNormal, "", "", acNormal
End Sub

Signature

Wayne
Manchester, England.

> Is there a way to print two reports at the same time with a control
> button?
[quoted text clipped - 3 lines]
>
> Thanking all in advance for your help!

Reply to this Message

Fred's - 10 Jan 2008 21:19 GMT

On Jan 10, 2:11 pm, Wayne-I-M <Wayn...@discussions.microsoft.com>
wrote:

> Private Sub ButtonName_Click()
> DoCmd.OpenReport "Report1", acViewNormal, "", "", acNormal
[quoted text clipped - 14 lines]
>
> - Show quoted text -

Hi Wayne,

I forgot to tell that the second report must be printed only if
specific suppliers appear on my first report?
What will be the best way to do that?

Thanking you in advance,
Fred.

Reply to this Message

Wayne-I-M - 10 Jan 2008 21:40 GMT

Without knowing your application I've not a clue.

In general would sugest that your 1st report is based on a query and that
"something" trips the 2nd report to print (poss. use an IIF)

you would need to give more information to ge an answer that works

Signature

Wayne
Manchester, England.

> On Jan 10, 2:11 pm, Wayne-I-M <Wayn...@discussions.microsoft.com>
> wrote:
[quoted text clipped - 25 lines]
> Thanking you in advance,
> Fred.

Reply to this Message

Fred's - 10 Jan 2008 21:44 GMT

On Jan 10, 4:40 pm, Wayne-I-M <Wayn...@discussions.microsoft.com>
wrote:

> Without knowing your application I've not a clue.
>
[quoted text clipped - 37 lines]
>
> - Show quoted text -

Could you provide an example?

Reply to this Message

Wayne-I-M - 11 Jan 2008 07:46 GMT

Not really - sorry about this I know it's not what you're looking for.

Look at it like this. If you have a report that shows ten suppliers and you
want a 2nd reprt to print if some suppliers are in the 1st. Thats no
problem. But - don't look at the reports. Look at the data in them.

In this case (this is just one quick idea) I may run the report from a form
based on a query (the same one that runs the first report). In this case I
would need to code a button that says .....IIf A and B and G and H suppliers
all on the form then run the 2nd report. If they are all not on the from,
then don't.

But, like I said you would need to provide more information about the trip
(what specifically makes you need to print the 2nd report) and what are you
using to get this date before you will get an answer that will work.

Signature

Wayne
Manchester, England.

> On Jan 10, 4:40 pm, Wayne-I-M <Wayn...@discussions.microsoft.com>
> wrote:
[quoted text clipped - 41 lines]
>
> Could you provide an example?

Reply to this Message

Fred's - 14 Jan 2008 20:07 GMT

On Jan 11, 2:46 am, Wayne-I-M <Wayn...@discussions.microsoft.com>
wrote:

> Not really - sorry about this I know it's not what you're looking for.
>
[quoted text clipped - 63 lines]
>
> - Show quoted text -

Thanks for your reply Wayne, here are more details;

This is the SQL Statement of the query that runs the first report.
(The name of the report is: Report container Details)

SELECT Source.TRAILER_NUM " " & libelle.ch2 AS location1,
division.wave, division.feuille, Source.TRAILER_NUM, Source.[Merch
Type], libelle.ch2 AS lib, Source.[Date In], Source.AppointmentDate,
Source.[WMS Shipment #], Source.Division, Source.[Retek 9 PO], Source.
[Old PO] AS po, Source.[AS400 Style #], Source.Color, Source.Supplier,
Source.Style, Source.SumOfREQUESTED_QTY, Source.ITM_COLOR,
Source.BalanceToBeReceived FROM libelle, division INNER JOIN Source ON
division.divisi = Source.Division WHERE
(((Source.TRAILER_NUM)=[TRAILER_NUM:] Or
(Source.TRAILER_NUM)=TRAILER_NUM:] & "US ") AND ((Source.[Merch
Type])=[libelle].[Merch Type]) AND ((Source.BalanceToBeReceived)<>0))
ORDER BY Source.[Retek 9 PO], Source.ITM_COLOR;

And the SQL Statement of the query that runs the second report below.
(The name of the report is: Worst supplier verification)

SELECT source.Division AS DIVISION, division.wave, division.feuille,
source.[WMS Shipment #] AS CHIPMENT, source.AppointmentDate AS DATEE,
source.[Retek 9 PO] AS PO, source.Style AS STYLEF, source.[AS400 Style
#] & " - " & source.ITM_COLOR AS NSTYLE, source.Color & " - " &
source.ITM_COLOR AS nb_cou, source.ITM_COLOR, source.TRAILER_NUM,
source.SumOfREQUESTED_QTY, source.[Total Qty], source.Supplier,
source.BalanceToBeReceived, nb_color.nb, " PO Ref. : " & source.[Old
PO] AS po_ref, libelle.ch2 AS dept, source.ORDER_TYPE
FROM nb_color, libelle, division INNER JOIN source ON division.divisi
= source.Division WHERE (((source.[Merch Type])=[libelle].[Merch
Type]) AND ((source.TRAILER_NUM) Like [TRAILER_NUM:]) AND ((source.
[Retek 9 PO])=[nb_color].[po]) AND ((source.BalanceToBeReceived)<>0))
GROUP BY source.Division, division.wave, division.feuille, source.[WMS
Shipment #], source.AppointmentDate, source.[Retek 9 PO],
source.Style, source.ITM_COLOR, source.TRAILER_NUM,
source.SumOfREQUESTED_QTY, source.[Total Qty], source.Supplier,
source.BalanceToBeReceived, nb_color.nb, libelle.ch2,
source.ORDER_TYPE, source.[Old PO], source.[AS400 Style #],
source.Color, source.[Old PO], source.[Merch Type]
ORDER BY source.[Retek 9 PO], source.ITM_COLOR;

Thanking you in advance,
Fred's

Reply to this Message