Something different...

J

Jen

Hey I am trying to make a report that will do something a little strange:

After each row of data is displayed I want a page break
Each time the page changes I want the data to move in by two inches
Once this has happened 5 times I want to start back at the left hand side

Something Like this
Data
Page Break
Indent 2 inches Data
Page Break
Indent 4 Inches Data
Page Break
Indent 6 Inches Data
Page Break
Indent 8 Inches Data
Page Break
Data
Page Break
Indent 2 inches Data
And so on

any bright Ideas?
 
D

Duane Hookom

Try place the Left property value of each control in the Tag property of the
control. Write code in the On Format event of the detail section like
(untested):

Dim lngIndent as Long
Dim ctl as Control
lngIndent = ( ([Page]-1) Mod 5) * 2880
For Each ctl in Me.Controls
If Len(ctl.Tag & "") >0 Then
ctl.Left = Val(ctl.Tag) + lngIndent
End If
End If
 
Top