Error when opening report for labels

C

CEV

I have created a report to print mailing labels. I am using Avery 5160
equilivent labels. They measure 1" x 2 5/8th". 3 across and 10 down.
Everything seems to work fine except for an error I get when opening the
report from a command button on a form. The error states " Some data may not
be displayed. There is not enough horizontal space on the page for the
number of columns and column spacing you specified. Click Page Setup on the
File menu, click the Columns tab, and then reduce the number of columns or
the size of the columns." Info on the column tab is as follows: 3 columns,
Column Spacing = 0.125, and Column size is 1" x 2.625".

If I just click ok on the error message it will show up again when I click
on print. If I click ok again it seems to print just fine with the 3 labels
across the top that I tested it with.

1. Does anyone know how I can eliminate this error message?

2. Say I only have 3 labels to print and I want to use a sheet of labels
that is partly used. How can I specify where the first label will print on
the sheet?

Thank You for your help,

CEV
 
F

fredg

I have created a report to print mailing labels. I am using Avery 5160
equilivent labels. They measure 1" x 2 5/8th". 3 across and 10 down.
Everything seems to work fine except for an error I get when opening the
report from a command button on a form. The error states " Some data may not
be displayed. There is not enough horizontal space on the page for the
number of columns and column spacing you specified. Click Page Setup on the
File menu, click the Columns tab, and then reduce the number of columns or
the size of the columns." Info on the column tab is as follows: 3 columns,
Column Spacing = 0.125, and Column size is 1" x 2.625".

If I just click ok on the error message it will show up again when I click
on print. If I click ok again it seems to print just fine with the 3 labels
across the top that I tested it with.

1. Does anyone know how I can eliminate this error message?

2. Say I only have 3 labels to print and I want to use a sheet of labels
that is partly used. How can I specify where the first label will print on
the sheet?

Thank You for your help,

CEV

Regarding #1:
You have some unused empty space in the control and that is causing
the problem as Access is telling you that the page is not wide enough
to print that excess blank space.
1) Ignore the message if you want.
2) Make the controls a bit less wide.
3) move the controls in the label report a bit more to the left.
4) In
File + PageSetUp + Columns
see if you can still get the labels to print properly by making the
column spacing a bit smaller.
Any combination of the above 4 items should do it.
Easiest is the first. :)


Regarding #2:
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.
 
C

CEV

Thanks Fred. Entering Code is new territory for me but something I need to
dig into. Exactly where do I enter this code?

Thanks,

CEV


fredg said:
I have created a report to print mailing labels. I am using Avery 5160
equilivent labels. They measure 1" x 2 5/8th". 3 across and 10 down.
Everything seems to work fine except for an error I get when opening the
report from a command button on a form. The error states " Some data may
not
be displayed. There is not enough horizontal space on the page for the
number of columns and column spacing you specified. Click Page Setup on
the
File menu, click the Columns tab, and then reduce the number of columns
or
the size of the columns." Info on the column tab is as follows: 3
columns,
Column Spacing = 0.125, and Column size is 1" x 2.625".

If I just click ok on the error message it will show up again when I
click
on print. If I click ok again it seems to print just fine with the 3
labels
across the top that I tested it with.

1. Does anyone know how I can eliminate this error message?

2. Say I only have 3 labels to print and I want to use a sheet of labels
that is partly used. How can I specify where the first label will print
on
the sheet?

Thank You for your help,

CEV

Regarding #1:
You have some unused empty space in the control and that is causing
the problem as Access is telling you that the page is not wide enough
to print that excess blank space.
1) Ignore the message if you want.
2) Make the controls a bit less wide.
3) move the controls in the label report a bit more to the left.
4) In
File + PageSetUp + Columns
see if you can still get the labels to print properly by making the
column spacing a bit smaller.
Any combination of the above 4 items should do it.
Easiest is the first. :)


Regarding #2:
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.
 
F

fredg

Thanks Fred. Entering Code is new territory for me but something I need to
dig into. Exactly where do I enter this code?

Thanks,

CEV

fredg said:
I have created a report to print mailing labels. I am using Avery 5160
equilivent labels. They measure 1" x 2 5/8th". 3 across and 10 down.
Everything seems to work fine except for an error I get when opening the
report from a command button on a form. The error states " Some data may
not
be displayed. There is not enough horizontal space on the page for the
number of columns and column spacing you specified. Click Page Setup on
the
File menu, click the Columns tab, and then reduce the number of columns
or
the size of the columns." Info on the column tab is as follows: 3
columns,
Column Spacing = 0.125, and Column size is 1" x 2.625".

If I just click ok on the error message it will show up again when I
click
on print. If I click ok again it seems to print just fine with the 3
labels
across the top that I tested it with.

1. Does anyone know how I can eliminate this error message?

2. Say I only have 3 labels to print and I want to use a sheet of labels
that is partly used. How can I specify where the first label will print
on
the sheet?

Thank You for your help,

CEV

Regarding #1:
You have some unused empty space in the control and that is causing
the problem as Access is telling you that the page is not wide enough
to print that excess blank space.
1) Ignore the message if you want.
2) Make the controls a bit less wide.
3) move the controls in the label report a bit more to the left.
4) In
File + PageSetUp + Columns
see if you can still get the labels to print properly by making the
column spacing a bit smaller.
Any combination of the above 4 items should do it.
Easiest is the first. :)


Regarding #2:
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.

Start with a working label report that correctly prints labels.

Then, in Design View, add a Report Header to the report.
Click View + Report Header/Footer.
Add the 2 unbound controls to the report header as indicated in my
previous response.

To write the code, right-click on the Report Header.
Select Properties. Click on the Event tab.
On the line that says On Format write [Event Procedure].
Click on the little button with 3 dots that will appear on that line.
When the code window opens, the cursor will be flashing between 2
already written lines of code. Write the code for the Report Header
where the cursor is flashing. (Do NOT duplicate the first and last
lines of my code, i.e. Private Sub ...etc. and End Sub.)

Do the same for the Report Detail section, except this time you are
entering the code in the Print event.

The Report Footer is not used, so you can move the footer bar up
against the detail section.
 
C

CEV

Fred, Your The Man!!! That worked and it's awesome!!

Thank You Very Much for contributing your knowledge,

CEV


fredg said:
Thanks Fred. Entering Code is new territory for me but something I need
to
dig into. Exactly where do I enter this code?

Thanks,

CEV

fredg said:
On Tue, 13 Dec 2005 14:05:04 -0600, CEV wrote:

I have created a report to print mailing labels. I am using Avery 5160
equilivent labels. They measure 1" x 2 5/8th". 3 across and 10 down.
Everything seems to work fine except for an error I get when opening
the
report from a command button on a form. The error states " Some data
may
not
be displayed. There is not enough horizontal space on the page for the
number of columns and column spacing you specified. Click Page Setup on
the
File menu, click the Columns tab, and then reduce the number of columns
or
the size of the columns." Info on the column tab is as follows: 3
columns,
Column Spacing = 0.125, and Column size is 1" x 2.625".

If I just click ok on the error message it will show up again when I
click
on print. If I click ok again it seems to print just fine with the 3
labels
across the top that I tested it with.

1. Does anyone know how I can eliminate this error message?

2. Say I only have 3 labels to print and I want to use a sheet of
labels
that is partly used. How can I specify where the first label will print
on
the sheet?

Thank You for your help,

CEV

Regarding #1:
You have some unused empty space in the control and that is causing
the problem as Access is telling you that the page is not wide enough
to print that excess blank space.
1) Ignore the message if you want.
2) Make the controls a bit less wide.
3) move the controls in the label report a bit more to the left.
4) In
File + PageSetUp + Columns
see if you can still get the labels to print properly by making the
column spacing a bit smaller.
Any combination of the above 4 items should do it.
Easiest is the first. :)


Regarding #2:
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.

Start with a working label report that correctly prints labels.

Then, in Design View, add a Report Header to the report.
Click View + Report Header/Footer.
Add the 2 unbound controls to the report header as indicated in my
previous response.

To write the code, right-click on the Report Header.
Select Properties. Click on the Event tab.
On the line that says On Format write [Event Procedure].
Click on the little button with 3 dots that will appear on that line.
When the code window opens, the cursor will be flashing between 2
already written lines of code. Write the code for the Report Header
where the cursor is flashing. (Do NOT duplicate the first and last
lines of my code, i.e. Private Sub ...etc. and End Sub.)

Do the same for the Report Detail section, except this time you are
entering the code in the Print event.

The Report Footer is not used, so you can move the footer bar up
against the detail section.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top