K
Kevin
I've created a multi-column report that prints labels in the first
column of each page. Everything looks fine on the screen when I print
preview. However when I print out the report, the labels do not print
out on the first page but the rest of the pages are fine. Can anyone
out there help me? The VBA code is below.
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim i As Integer
If (Me.Left = 720 Or Me.Left = 1800) And Me.Page >
Me.NewPage.Caption Then
Me.NextRecord = False
For i = 1 To 24
Me("b" & i).Visible = False
Me("a" & i).Visible = True
Next i
Me.NewPage.Caption = Me.Page
Else
Me.NextRecord = True
For i = 1 To 24
Me("b" & i).Visible = True
Me("a" & i).Visible = False
Next i
End If
End Sub
column of each page. Everything looks fine on the screen when I print
preview. However when I print out the report, the labels do not print
out on the first page but the rest of the pages are fine. Can anyone
out there help me? The VBA code is below.
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim i As Integer
If (Me.Left = 720 Or Me.Left = 1800) And Me.Page >
Me.NewPage.Caption Then
Me.NextRecord = False
For i = 1 To 24
Me("b" & i).Visible = False
Me("a" & i).Visible = True
Next i
Me.NewPage.Caption = Me.Page
Else
Me.NextRecord = True
For i = 1 To 24
Me("b" & i).Visible = True
Me("a" & i).Visible = False
Next i
End If
End Sub