Borge Hansen
pcs at azizaz.com
Wed Aug 23 21:51:50 CDT 2006
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