4 identical subreports on one page

[prairiewind via AccessMonster.com]

I have a report that is 4" wide and 5" tall. Rather than wasting a lot of
paper, is there a way to place them all one one page? The trick is that the
report is actually about 60 pages long. There are 3 grouping levels; State,
Meeting and People. All three grouping levels are set on "Whole Group."
Occasionally, the People group spans a couple of pages.

I've worked with 4 subreports in a report, but can't get the output to be
correct. I've tried to make pseudo page headers and put the subreports in
there. That has seemed to work the best, but the pseudo page header Repeat
Section has to be set at "Yes" in order for the bottom pseudo page to show.
That causes the top psuedo page headers to show the same data for every page.

Sorry if I'm not real clear on the problem. Will be glad to expound more.

Jeff

 

[Marshall Barton]

I have a report that is 4" wide and 5" tall. Rather than wasting a lot of
paper, is there a way to place them all one one page? The trick is that the
report is actually about 60 pages long. There are 3 grouping levels; State,
Meeting and People. All three grouping levels are set on "Whole Group."
Occasionally, the People group spans a couple of pages.

I've worked with 4 subreports in a report, but can't get the output to be
correct. I've tried to make pseudo page headers and put the subreports in
there. That has seemed to work the best, but the pseudo page header Repeat
Section has to be set at "Yes" in order for the bottom pseudo page to show.
That causes the top psuedo page headers to show the same data for every page.

Have you tried using fixed height sections
(CanGrow/CanShrink = No) and 2 columns with Across then Down
snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

 

[prairiewind via AccessMonster.com]

I'm sorry, but I'm just as confused now as ever. Your suggestion, was that
to be tried in the main report or subreports? I've tried both with no avail.
I don't see a way that I can use fixed height sections in the report as the
detail section needs to grow.

More of a follow, but what I'm wanting is on page one of the subreport, is to
have 4 copies of the first page of the main report, 4 copies of page 2 of the
main report on page 2 of the subreport and so on.

Jeff

I have a report that is 4" wide and 5" tall. Rather than wasting a lot of
paper, is there a way to place them all one one page? The trick is that the

[quoted text clipped - 7 lines]

Section has to be set at "Yes" in order for the bottom pseudo page to show.
That causes the top psuedo page headers to show the same data for every page.

Have you tried using fixed height sections
(CanGrow/CanShrink = No) and 2 columns with Across then Down
snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

 

[Marshall Barton]

Now I am totally confused. I thought you were trying to a
"mailing label" type of report, but I have no idea how
subreport fits into the picture.

From what little I think I might understand, I think using
subreport might just be getting in the way.
--
Marsh
MVP [MS Access]

I'm sorry, but I'm just as confused now as ever. Your suggestion, was that
to be tried in the main report or subreports? I've tried both with no avail.
I don't see a way that I can use fixed height sections in the report as the
detail section needs to grow.

More of a follow, but what I'm wanting is on page one of the subreport, is to
have 4 copies of the first page of the main report, 4 copies of page 2 of the
main report on page 2 of the subreport and so on.

I have a report that is 4" wide and 5" tall. Rather than wasting a lot of
paper, is there a way to place them all one one page? The trick is that the

[quoted text clipped - 7 lines]

Section has to be set at "Yes" in order for the bottom pseudo page to show.
That causes the top psuedo page headers to show the same data for every page.

Have you tried using fixed height sections
(CanGrow/CanShrink = No) and 2 columns with Across then Down
snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

 

[prairiewind via AccessMonster.com]

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60
pages long that I make into a booklet for distribution to about 100 people.
A page size of around 4.25" wide and 5.5" tall is ideal. What I'm trying to
do is to somehow get four pages of the report on a page. This would allow me
to print page one on the front, page two on the back, page 3 on the front of
a new page, page four on the back, etc. which would create a booklet format.
I hope this is a wee bit clearer.

I had tried to create a new report with my desired report as a subreport,
placed four times in the body of the main report. I think that is where the
subreport came into the picture.

Sorry for the headaches and thanks for the help.

Jeff

Now I am totally confused. I thought you were trying to a
"mailing label" type of report, but I have no idea how
subreport fits into the picture.

From what little I think I might understand, I think using
subreport might just be getting in the way.

I'm sorry, but I'm just as confused now as ever. Your suggestion, was that
to be tried in the main report or subreports? I've tried both with no avail.

[quoted text clipped - 15 lines]

 

[Chuck]

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60
pages long that I make into a booklet for distribution to about 100 people.
A page size of around 4.25" wide and 5.5" tall is ideal. What I'm trying to
do is to somehow get four pages of the report on a page. This would allow me
to print page one on the front, page two on the back, page 3 on the front of
a new page, page four on the back, etc. which would create a booklet format.
I hope this is a wee bit clearer.

I had tried to create a new report with my desired report as a subreport,
placed four times in the body of the main report. I think that is where the
subreport came into the picture.

Sorry for the headaches and thanks for the help.

Jeff

Now I am totally confused. I thought you were trying to a
"mailing label" type of report, but I have no idea how
subreport fits into the picture.

From what little I think I might understand, I think using
subreport might just be getting in the way.

I'm sorry, but I'm just as confused now as ever. Your suggestion, was that
to be tried in the main report or subreports? I've tried both with no avail.

[quoted text clipped - 15 lines]

snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

From a post by Bob Howard:
"finally decided to use a software product called FinePrint
(www.fineprint.com) which acts as a Postscript printer. I give it the
appropriate settings to configure the result as a booklet, and it takes care
of the whole thing." (snip) about $50.00

 

[prairiewind via AccessMonster.com]

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great,
but am still looking for a way to do it all with Access. Will be playing
around with FinePrint more, but still open for suggestions.

Jeff

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60

[quoted text clipped - 24 lines]
From a post by Bob Howard:
"finally decided to use a software product called FinePrint
(www.fineprint.com) which acts as a Postscript printer. I give it the
appropriate settings to configure the result as a booklet, and it takes care
of the whole thing." (snip) about $50.00

 

[prairiewind via AccessMonster.com]

Since I last wrote, I've figured out more about FinePrint. I've resized my
report in Access to fit an entire page and now it is the right size in
FinePrint. However, for others that will be using the program which I
distribute, it would be nice if they didn't each have to purchase the program,
thus I'm still looking for a way to do it all in Access.

Jeff

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great,
but am still looking for a way to do it all with Access. Will be playing
around with FinePrint more, but still open for suggestions.

Jeff
[quoted text clipped - 7 lines]

appropriate settings to configure the result as a booklet, and it takes care
of the whole thing." (snip) about $50.00

 

[Marshall Barton]

I'm probably still missing something, but I don't see how
you can get that effect. Because you need the subreport to
grow, there is no way I can think of to get part of a
subreport on one page and another part on a different page.
It would be very difficult (maybe even impossible) to
determine when that would be required.

You will probably be better off using a print utility that
takes a single copy of the report and organizes its printing
to the desired layout.
--
Marsh
MVP [MS Access]

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60
pages long that I make into a booklet for distribution to about 100 people.
A page size of around 4.25" wide and 5.5" tall is ideal. What I'm trying to
do is to somehow get four pages of the report on a page. This would allow me
to print page one on the front, page two on the back, page 3 on the front of
a new page, page four on the back, etc. which would create a booklet format.
I hope this is a wee bit clearer.

I had tried to create a new report with my desired report as a subreport,
placed four times in the body of the main report. I think that is where the
subreport came into the picture.

Now I am totally confused. I thought you were trying to a
"mailing label" type of report, but I have no idea how
subreport fits into the picture.

From what little I think I might understand, I think using
subreport might just be getting in the way.

I'm sorry, but I'm just as confused now as ever. Your suggestion, was that
to be tried in the main report or subreports? I've tried both with no avail.

[quoted text clipped - 15 lines]

snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

 

[prairiewind via AccessMonster.com]

Thanks for your help. I've ended up using FinePrint for myself and have made
a new report that puts 3 copies side-by-side, evenly spaced across the page
laid in landscape mode. This allows them to print front and back properly
for the little printing they need to do. I do most of the printing and have
settled on FinePrint.

Jeff

I'm probably still missing something, but I don't see how
you can get that effect. Because you need the subreport to
grow, there is no way I can think of to get part of a
subreport on one page and another part on a different page.
It would be very difficult (maybe even impossible) to
determine when that would be required.

You will probably be better off using a print utility that
takes a single copy of the report and organizes its printing
to the desired layout.

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60

[quoted text clipped - 20 lines]

 

[Chuck]

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great,
but am still looking for a way to do it all with Access. Will be playing
around with FinePrint more, but still open for suggestions.

Jeff

I felt my first report was a bit vague, but wanted to include as much
information as to what I've already tried. I have a report that is about 60

[quoted text clipped - 24 lines]

snaking (File - Page Setup menu)? Use the NewRowOrColumn
property in the appropriate group header section.

From a post by Bob Howard:
"finally decided to use a software product called FinePrint
(www.fineprint.com) which acts as a Postscript printer. I give it the
appropriate settings to configure the result as a booklet, and it takes care
of the whole thing." (snip) about $50.00

Booklet sort order.

Total number of records must be MANUALLY padded so that:
Total number of records / Records per page / 4 is an integer.
[Rcd] is an integer sequential record number in the order in which you want the
records sorted.
Page is half of a sheet in landscape mode. The printout is 4 pages per sheet.

SQL statement for calculated value of [Sort Order]
Set the sort order of the calculated field [Sort Order] to ascending.

SELECT IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0)) AS Sort,
{Record Source}.Person, {Record Source}.rcd
FROM {Record Source}
ORDER BY IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0));


Just a wizard prodder
Chuck
--

 

[prairiewind via AccessMonster.com]

I guess I'm a bit confused as to what you just posted as to where that code
is to be placed.

Jeff

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great,

[quoted text clipped - 14 lines]
Booklet sort order.

Total number of records must be MANUALLY padded so that:
Total number of records / Records per page / 4 is an integer.
[Rcd] is an integer sequential record number in the order in which you want the
records sorted.
Page is half of a sheet in landscape mode. The printout is 4 pages per sheet.

SQL statement for calculated value of [Sort Order]
Set the sort order of the calculated field [Sort Order] to ascending.

SELECT IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0)) AS Sort,
{Record Source}.Person, {Record Source}.rcd
FROM {Record Source}
ORDER BY IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0));

Just a wizard prodder
Chuck
--

 

[Chuck]

I guess I'm a bit confused as to what you just posted as to where that code
is to be placed.

Jeff

Your data is in a table
Add a field (Rcd) to the table. Data Type - Number
set Field Size to Integer. set Format 00 (or 000 if number of records is > 99)
set Input Mask 00 (or 000)
Make a query based in the table.
Include all the fields you want to be in the report plus the Rcd field you just
added. At this point it will be blank.
Sort the query the way you want the report to be sorted If it were going to be
printed a long single column list, possibly LastName Sort Assending
In the Rec field enter increasing sequential numbers starting with 01 (or 001)
Make a new query (Sort Query) based on the table query.
Include all the fields.
Add the following field:
SortOrder: IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records
per page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0))

Switch the query from Design View to SQL View and it should look like the code
below.

This is not something you are going to want to distribute. There is too much
manual work.

Believe me, FinePrint is by far the best way to go.

Take the number of sheets of printer paper you expect the report to require.
Fold each in half. Put them together. Staple them on the fold. Is this
really something you want to use. It gets awkward after very few sheets.

Chuck
--

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great,

[quoted text clipped - 14 lines]

appropriate settings to configure the result as a booklet, and it takes care
of the whole thing." (snip) about $50.00

Booklet sort order.

Total number of records must be MANUALLY padded so that:
Total number of records / Records per page / 4 is an integer.
[Rcd] is an integer sequential record number in the order in which you want the
records sorted.
Page is half of a sheet in landscape mode. The printout is 4 pages per sheet.

SQL statement for calculated value of [Sort Order]
Set the sort order of the calculated field [Sort Order] to ascending.

SELECT IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0)) AS Sort,
{Record Source}.Person, {Record Source}.rcd
FROM {Record Source}
ORDER BY IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records per
page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0));

Just a wizard prodder
Chuck
--

 

[prairiewind via AccessMonster.com]

You're right, FinePrint is a whole lot easier. Thanks for all you've done.
Have just decided that I'll just send out the updated booklet when needed
instead of everyone buying a copy of FinePrint unless they want to.

Jeff

I guess I'm a bit confused as to what you just posted as to where that code
is to be placed.

Jeff

Your data is in a table
Add a field (Rcd) to the table. Data Type - Number
set Field Size to Integer. set Format 00 (or 000 if number of records is > 99)
set Input Mask 00 (or 000)
Make a query based in the table.
Include all the fields you want to be in the report plus the Rcd field you just
added. At this point it will be blank.
Sort the query the way you want the report to be sorted If it were going to be
printed a long single column list, possibly LastName Sort Assending
In the Rec field enter increasing sequential numbers starting with 01 (or 001)
Make a new query (Sort Query) based on the table query.
Include all the fields.
Add the following field:
SortOrder: IIf([Rcd]<={Total Records / 2},(2*[Rcd]+2-((([Rcd]-1) Mod {Records
per page * 2}))),IIf([Rcd]>{Total Records / 2},IIf(Int((([Rcd]-((([Rcd]-1) Mod
{Records per page})+1))/{Records per page})/2)=(([Rcd]-((([Rcd]-1) Mod {Records
per page})+1))/{Records per page})/2,(-2*[Rcd]+{Total Records *
2})+(((([Rcd]-{Total Records + 1}) Mod {Records per page})*{Records per
page})-0),((-2*[Rcd])+{Total Records * 2})+(((([Rcd]-{Total Records + 1}) Mod
{Records per page})*{Records per page})-{Records per page})),0))

Switch the query from Design View to SQL View and it should look like the code
below.

This is not something you are going to want to distribute. There is too much
manual work.

Believe me, FinePrint is by far the best way to go.

Take the number of sheets of printer paper you expect the report to require.
Fold each in half. Put them together. Staple them on the fold. Is this
really something you want to use. It gets awkward after very few sheets.

Chuck

I've already looked into FinePrint and am not satisfied how it reduces the
print size to where I can't read it, etc. A lot of what it does is great, [quoted text clipped - 33 lines]
Chuck
--

 

[Chuck]

You're right, FinePrint is a whole lot easier. Thanks for all you've done.
Have just decided that I'll just send out the updated booklet when needed
instead of everyone buying a copy of FinePrint unless they want to.

Jeff

If you are still monitoring the news group, there is another solution that may
be a better solution. It prints page 2 on the back of 1 and 4 on the back of
3. If you use 8.5 * 11 the results are like this:
1 4
2 3

Fold it in the middle so page one is on the face and all the pages fall in
order. Pages 1 thru 4 on sheet 1, pages 5 thru 8 on sheet 2.

Folded pages are stacked one in back of the other rather than one inside
another.

Disadvantages: Staples must go thru twice as many sheets and lots of folds to
see

Advantages: All handled in Access. No 3rd party software. Will also print to
5.5 * 8.5. Anyone can do it. Any number of records will work. No mickey
mouse operations.

Just a wizard prodder
Chuck
--

 

[prairiewind via AccessMonster.com]

I'm still monitoring and interested, so go ahead and send what you know. I
actually don't staple, but do a spirl bind so I cut the pages and not fold.

Thanks,
Jeff

 

[Chuck]

Thanks for your help. I've ended up using FinePrint for myself and have made
a new report that puts 3 copies side-by-side, evenly spaced across the page
laid in landscape mode. This allows them to print front and back properly
for the little printing they need to do. I do most of the printing and have
settled on FinePrint.

Jeff

Does this mean that when the printing is finished, you cut the sheets into
thirds and get 3 booklets per print? If so, this is the best you can do.

Before you said you cut the sheets and use a spiral binding my suggestion
would habe been to make an ordinary report and do duplex printing. You've gone
three better than that and saved a lot of paper I'd have been using for scratch
pads.

Correct, BUT:
Only for 3 records page!

Replacing '3' with an input variable [RPP] {Records Per Page}
does not seem to work!!! When there are double 3s only the second was changed.
Don't know why, it works fine in Excel.. I've obviously made a mistake
translating Excel code to Access code.


PrintOrder: [Rcd]+IIf(([Rcd]-1) Mod (4*3)+1<=3,(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/3)+3*3),IIf(((([Rcd]-1) Mod (4*3))+1)>3 And ((([Rcd]-1) Mod
(4*3))+1)<=(2*3),(Int((((([Rcd]-1) Mod (4*3))+1)-1)/3)-3-1),IIf(((([Rcd]-1) Mod
(4*3))+1)>(2*3) And (((([Rcd]-1) Mod (4*3))+1)<=(3*3)),(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/(2*3))-3-1),IIf(((([Rcd]-1) Mod (4*3))+1)>(3*3),(Int((((([Rcd]-1)
Mod (4*3))+1)-1)/(3*3))-3-1))))))

Chuck

 

[Chuck]

Thanks for your help. I've ended up using FinePrint for myself and have made
a new report that puts 3 copies side-by-side, evenly spaced across the page
laid in landscape mode. This allows them to print front and back properly
for the little printing they need to do. I do most of the printing and have
settled on FinePrint.

Jeff

Does this mean that when the printing is finished, you cut the sheets into
thirds and get 3 booklets per print? If so, this is the best you can do.

Before you said you cut the sheets and use a spiral binding my suggestion
would habe been to make an ordinary report and do duplex printing. You've gone
three better than that and saved a lot of paper I'd have been using for scratch
pads.

Correct, BUT:
Only for 3 records page!

Replacing '3' with an input variable [RPP] {Records Per Page}
does not seem to work!!! When there are double 3s only the second was changed.
Don't know why, it works fine in Excel.. I've obviously made a mistake
translating Excel code to Access code.


PrintOrder: [Rcd]+IIf(([Rcd]-1) Mod (4*3)+1<=3,(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/3)+3*3),IIf(((([Rcd]-1) Mod (4*3))+1)>3 And ((([Rcd]-1) Mod
(4*3))+1)<=(2*3),(Int((((([Rcd]-1) Mod (4*3))+1)-1)/3)-3-1),IIf(((([Rcd]-1) Mod
(4*3))+1)>(2*3) And (((([Rcd]-1) Mod (4*3))+1)<=(3*3)),(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/(2*3))-3-1),IIf(((([Rcd]-1) Mod (4*3))+1)>(3*3),(Int((((([Rcd]-1)
Mod (4*3))+1)-1)/(3*3))-3-1))))))

Chuck

Now have a general solution:

When the report is opened, a window opens that asks "Records Per Page', that
is the input for [RPP]
[Rcd] is a sequential record number.

PrintOrder: [Rcd]+

IIf(([Rcd]-1) Mod (4*[RPP])+1<([RPP]+1),(Int((((([Rcd]-1) Mod
(4*[RPP]))+1)-1)/([Rpp]))+3*[RPP]),

IIf(((([Rcd]-1) Mod (4*[RPP]))+1)>([RPP]+0.1) And ((([Rcd]-1) Mod
(4*[RPP]))+1)<(2*([RPP]+1)-1),(Int((((([Rcd]-1) Mod
(4*[RPP]))+1)-1)/[RPP])-[RPP]-1),

IIf(((([Rcd]-1) Mod (4*[RPP]))+1)>(2*[RPP]+0.1) And (((([Rcd]-1) Mod
(4*[RPP]))+1)<=(3*[RPP])),(Int((((([Rcd]-1) Mod
(4*[RPP]))+1)-1)/(2*[RPP]))-[RPP]-1),

IIf(((([Rcd]-1) Mod (4*[RPP]))+1)>(3*[RPP]+0.1),(Int((((([Rcd]-1) Mod
(4*[RPP]))+1)-1)/(3*[RPP]))-[RPP]-1)))))

Equation split to make it easier to read.

Obviously the height of the report detail section must be adjusted for each
[RPP]

If the report will always have the same number of records printed per page,
[RPP] can be hard wired and the report detail section can be a fixed size.

Just a wizard prodder
Chuck

 

[prairiewind via AccessMonster.com]

Yes, what I've done at the present to get something to work is to use
FinePrint for myself and then made another report for others who don't have
FinePrint. On that report, I have three equally spaced sections of the
detail portion of the report with the report laid out landscape mode. All
they need to do is print double sided and then cut on the lines I've placed
on the first page.

I haven't had time to get around to work on your suggestions, but will have
time the coming couple of days. Thanks for all your help.

Jeff

Thanks for your help. I've ended up using FinePrint for myself and have made
a new report that puts 3 copies side-by-side, evenly spaced across the page

[quoted text clipped - 3 lines]

Jeff

Does this mean that when the printing is finished, you cut the sheets into
thirds and get 3 booklets per print? If so, this is the best you can do.

Before you said you cut the sheets and use a spiral binding my suggestion
would habe been to make an ordinary report and do duplex printing. You've gone
three better than that and saved a lot of paper I'd have been using for scratch
pads.

Correct, BUT:
Only for 3 records page!

Replacing '3' with an input variable [RPP] {Records Per Page}
does not seem to work!!! When there are double 3s only the second was changed.
Don't know why, it works fine in Excel.. I've obviously made a mistake
translating Excel code to Access code.

PrintOrder: [Rcd]+IIf(([Rcd]-1) Mod (4*3)+1<=3,(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/3)+3*3),IIf(((([Rcd]-1) Mod (4*3))+1)>3 And ((([Rcd]-1) Mod
(4*3))+1)<=(2*3),(Int((((([Rcd]-1) Mod (4*3))+1)-1)/3)-3-1),IIf(((([Rcd]-1) Mod
(4*3))+1)>(2*3) And (((([Rcd]-1) Mod (4*3))+1)<=(3*3)),(Int((((([Rcd]-1) Mod
(4*3))+1)-1)/(2*3))-3-1),IIf(((([Rcd]-1) Mod (4*3))+1)>(3*3),(Int((((([Rcd]-1)
Mod (4*3))+1)-1)/(3*3))-3-1))))))

Chuck

 

[Chuck]

Yes, what I've done at the present to get something to work is to use
FinePrint for myself and then made another report for others who don't have
FinePrint. On that report, I have three equally spaced sections of the
detail portion of the report with the report laid out landscape mode. All
they need to do is print double sided and then cut on the lines I've placed
on the first page.

Your present method is the best solution.

Chuck