Gustav Brock
Gustav at cactus.dk
Wed Oct 29 11:14:40 CDT 2008
Hi Chester
Couldn't you introduce a second constant:
Const cMaxLine16 = 16
and adjust the code like this:
If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then
Me.NextRecord = False
Me.PrintSection = False
End If
/gustav
>>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>>
I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data?
Chester Kaup
Engineering Technician
Kinder Morgan CO2 Company, LLP
Office (432) 688-3797
FAX (432) 688-3799