Skipping Used Labels

[Guest]

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

 

[fredg]

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

 

[Guest]

You state, " Only the firs page of labels will have the skipped positions.".
When using Access 2000 & Access 2003, if I enter #9 to skip 9 labels, all
pages (not just the first page) will skip the first 9 labels.

I've tried your code as well as Article ID:95806. They both skip labels
after the first page.

Any suggestions would be appreciated?

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

 

[fredg]

You state, " Only the firs page of labels will have the skipped positions.".
When using Access 2000 & Access 2003, if I enter #9 to skip 9 labels, all
pages (not just the first page) will skip the first 9 labels.

I've tried your code as well as Article ID:95806. They both skip labels
after the first page.

Any suggestions would be appreciated?

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

Then I would suspect you have something else going on here.
I know my code will only skip label positions on the first page. I
would strongly suspect that the code from the Microsoft article will
also only skip positions on the first page. If you're having this
problem with both sets of code, it's not the code.

I suggest you create a new label printing report without any other
code or frills. Add my code (or Microsofts) and see if that works. I
suspect it will. Then start adding whatever other frills or code need
until it fails. Then you'll know what needs to be fixed.

 

[Guest]

You state, " Only the firs page of labels will have the skipped positions.".
When using Access 2000 & Access 2003, if I enter #9 to skip 9 labels, all
pages (not just the first page) will skip the first 9 labels.

I've tried your code as well as Article ID:95806. They both skip labels
after the first page.

Any suggestions would be appreciated?

On Mon, 15 Nov 2004 13:18:04 -0800, Brett S. wrote:

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

Then I would suspect you have something else going on here.
I know my code will only skip label positions on the first page. I
would strongly suspect that the code from the Microsoft article will
also only skip positions on the first page. If you're having this
problem with both sets of code, it's not the code.

I suggest you create a new label printing report without any other
code or frills. Add my code (or Microsofts) and see if that works. I
suspect it will. Then start adding whatever other frills or code need
until it fails. Then you'll know what needs to be fixed.

Oddly enough... I just created a new database with one table containing
directory information on a different computer (at my house this time). The
exact problem is happening. Windows XP SP2, Office 2003 SP1. I created a
new report using the label wizard. The labels work well without any
modifications. Then I impliment the code to change the starting label and
the change impacts all pages, not just the first. I know I am missing
something... No clue what it is.
Thanks for the fast response.

 

[Guest]

You state, " Only the firs page of labels will have the skipped positions.".
When using Access 2000 & Access 2003, if I enter #9 to skip 9 labels, all
pages (not just the first page) will skip the first 9 labels.

I've tried your code as well as Article ID:95806. They both skip labels
after the first page.

Any suggestions would be appreciated?

On Mon, 15 Nov 2004 13:18:04 -0800, Brett S. wrote:

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

Then I would suspect you have something else going on here.
I know my code will only skip label positions on the first page. I
would strongly suspect that the code from the Microsoft article will
also only skip positions on the first page. If you're having this
problem with both sets of code, it's not the code.

I suggest you create a new label printing report without any other
code or frills. Add my code (or Microsofts) and see if that works. I
suspect it will. Then start adding whatever other frills or code need
until it fails. Then you'll know what needs to be fixed.

Sorry for waisting your time... As soon as I posted my last reply, it
occurred to me that I was using the page header rather than the report
header... Sometimes it is the simple things that make you grin!!

Thanks again for the help.
Merry Christmas!!

 

[fredg]

You state, " Only the firs page of labels will have the skipped positions.".
When using Access 2000 & Access 2003, if I enter #9 to skip 9 labels, all
pages (not just the first page) will skip the first 9 labels.

I've tried your code as well as Article ID:95806. They both skip labels
after the first page.

Any suggestions would be appreciated?

:

On Mon, 15 Nov 2004 13:18:04 -0800, Brett S. wrote:

I used the script listed in KB299024 to set up my label report to skip used
labels. However, if the report goes past one page the labels skip on all the
subsequent pages too. I have been looking for a way to create a condition in
this script that will only skip the labels on the first printed page and roll
over to a full sheet of labels on all the subsequent pages. Can anyone lend a
hand? Here's the KB for reference:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299024.

Thanks

Try it this way.

First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
==========

Next code the Detail OnPrint event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False
Me.PrintSection = False
Else
[SkipControl] = "No"
Me.PrintSection = True
Me.NextRecord = True
End If

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.
Only the firs page of labels will have the skipped positions.

Then I would suspect you have something else going on here.
I know my code will only skip label positions on the first page. I
would strongly suspect that the code from the Microsoft article will
also only skip positions on the first page. If you're having this
problem with both sets of code, it's not the code.

I suggest you create a new label printing report without any other
code or frills. Add my code (or Microsofts) and see if that works. I
suspect it will. Then start adding whatever other frills or code need
until it fails. Then you'll know what needs to be fixed.

Sorry for waisting your time... As soon as I posted my last reply, it
occurred to me that I was using the page header rather than the report
header... Sometimes it is the simple things that make you grin!!

Thanks again for the help.
Merry Christmas!!
Regarding:
Sometimes it is the simple things that make you grin!!<

Is that a grin or a grimace (as your fingernails are digging into your
palms)? <grin>
Been there and done that.
Have a great holiday too.