Re: How to show / print a system variable in a report
- From: "Charles" <Charles@xxxxxxxxxxxxxxxxxxxxxxxxx>
- Date: Tue, 14 Feb 2006 06:31:28 -0800
Wow, What a speedy response. Thank you very much. It gives me a better
approach.
The question is no longer relevant to my immediate problem but . . . .
Is there a way of printing the variable on the report?
--
Thank You again
Charles
"Allen Browne" wrote:
The technique described in that article is flawed..
It relies on repeating some report events, but if you print just some pages
of the report (e.g. starting at page 5), the events for the intervening
pages may not fire, and so you get incorrect results.
For a more reliable approach, see:
Printing a Quantity of a Label
at:
http://allenbrowne.com/ser-39.html
The article explains how to generate the right number of records for the
labels (using a Cartesian Product query), and also explains how to add the
"Label x of y" to each label.
--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.
"Charles" <Charles@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:EF6C0E1B-9758-4D69-B344-9E72D6435299@xxxxxxxxxxxxxxxx
I am using the rather technique shown in:
The Knowledge Base Article ID : 95806
How to Skip Used Mailing Labels and Print Duplicates
Which works a treat.
What I would like to do, on each "label", is to have a control that shows
something like:
Label No X of XX
The normal "Runing Sum" method seems not to respond in the way I want.
There are a number of variables in the code, which is reproduced below:
Function LabelInitialize ()
BlankCount& = 0
CopyCount& = 0
End Function
'==================================================
' The following function is the main part of this code
' that allows the labels to print as the user desires.
'==================================================
Function LabelLayout (R As Report)
If BlankCount& < LabelBlanks& Then
R.NextRecord = False
R.PrintSection = False
BlankCount& = BlankCount& + 1
Else
If CopyCount& < (LabelCopies& - 1) Then
R.NextRecord = False
CopyCount& = CopyCount& + 1
Else
CopyCount& = 0
End If
End If
End Function
'==================================================
It seems to me that somewhere / somehow, I should be able to use "
CopyCount
".
--
Thank You in advance
- Follow-Ups:
- Re: How to show / print a system variable in a report
- From: Allen Browne
- Re: How to show / print a system variable in a report
- References:
- Re: How to show / print a system variable in a report
- From: Allen Browne
- Re: How to show / print a system variable in a report
- Prev by Date: Re: Automatically changing size of fields on report
- Next by Date: Re: Automatically changing size of fields on report
- Previous by thread: Re: How to show / print a system variable in a report
- Next by thread: Re: How to show / print a system variable in a report
- Index(es):
Relevant Pages
|
Loading