[AccessD] Printing Mailing Labels Starting at Specific Location

Rocky,
Disregard previous message....

This does the trick, for anyone who's interested....
Regards
borge

*************
Option Compare Database
Option Explicit
  Public i As Integer    'counter
  Public q As Integer   ' The label number you wish to start printing on


Private Sub Report_Open(Cancel As Integer)
     i = 1        
    q = 8
End Sub

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    If Me.Page = 1 Then
        If i < q Then
            Me.MoveLayout = True
            Me.NextRecord = False
            Me.PrintSection = False
            i = i + 1
        End If
    End If
End Sub

*******************

----- Original Message ----- 
From: "Borge Hansen" <pcs at azizaz.com>
To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com>
Sent: Thursday, August 24, 2006 12:19 PM
Subject: [AccessD] Printing Mailing Labels Starting at Specific Location


> Rocky,
> I've looked at the suggestion that Ketz et. al provide in their AccessXP Handbook.
> 
> Your solution sounds like it's based only on a few lines of code in the Detail_Format event plus input about the number of labels
> you want to skip.
> 
> I tried something like that and can't get the starting of the label printing to move....
> 
> regards
> Borge
> 
> ----- Original Message ----- 
> From: "Rocky Smolin - Beach Access Software" <bchacc at san.rr.com>
> > I print labels one at a time to mail out a consumer based product in an
> > envelope so in the Detail_Format event of the label printing report, I use:
> >
> >     Me.MoveLayout = True
> >     Me.NextRecord = False
> >     Me.PrintSection = False
> >
> > and iterate for the number of labels you want to skip.  But, of course,
> > you have to know how many labels you want to skip and pass that to the
> > loop or counter.
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com