More problems with columns

G

Guest

I'm sorry if this has already been addressed. I'm a newbie, soon to graduate
to beginner. I am making a columnar report, following the directions I found
for making labels on the left. It worked!! I was very surprised! My
problem is that I want to have 12 columns on one page. If I change the width
of the column on my page setup it then makes 2 columns of labels and then my
data on 2 columns. Also, according to my directions, it said to place my
label and my text boxes on top of each other. I think this is causing my
first column of data not to show. Does anyone have any tips of finishing
touches I can do to make this thing work? Thanks so much!!!
 
M

Marshall Barton

Kelly said:
I'm sorry if this has already been addressed. I'm a newbie, soon to graduate
to beginner. I am making a columnar report, following the directions I found
for making labels on the left. It worked!! I was very surprised! My
problem is that I want to have 12 columns on one page. If I change the width
of the column on my page setup it then makes 2 columns of labels and then my
data on 2 columns. Also, according to my directions, it said to place my
label and my text boxes on top of each other. I think this is causing my
first column of data not to show. Does anyone have any tips of finishing
touches I can do to make this thing work?

If you're referring to the article I'm thinking of, it
sounds like you did not use the code from the article
correctly. Maybe you forgot the NextRecord = False line
and/or setting some of the Visible properties??

BTW, you can use Page Setup to set the number of columns to
12 easily enough, but don't to set the column width to a
small enough value so all 12 columns fit netween the
margins.
 
G

Guest

Marshall -
You were absolutely right about the NextRecord = False. That fixed that
data problem. I am still having problems with the number of columns on the
report. I still can't get all 12 columns to show up. I can use page set up
to set 12 columns, but I can't use a width of less than 1.5. If I go to 1.4,
it will add a second column of labels, right next to the first, and then will
add 4 more columns of data, with plenty of room between each. I've tried
changing the size of my labels, but it still stays the same.
Here is the code I used, which is working great except for the columns.
Option Compare Database

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Left < (2 * 1440) Then
Me![LTTotalLabel].Visible = True
Me![ChildcareLabel].Visible = True
Me![EastsideLabel].Visible = True
Me![NurseryLabel].Visible = True
Me![DCESLabel].Visible = True
Me![MSLabel].Visible = True
Me![HSLabel].Visible = True
Me![9thLabel].Visible = True
Me![10thLabel].Visible = True
Me![11thLabel].Visible = True
Me![12thLabel].Visible = True
Me![NumberofClassesLabel].Visible = True
Me![AcademicSupportLabel].Visible = True
Me![HomeEdISPLabel].Visible = True
Me![GymLTLabel].Visible = True
Me![GymDCSLabel].Visible = True
Me![DanceLabel].Visible = True
Me![CheerLabel].Visible = True
Me![GymClubLabel].Visible = True
Me![EnrichmentLabel].Visible = True
Me![PeachFactoryLabel].Visible = True
Me![DCSTotalLabel].Visible = True
Me![LTTotal].Visible = False
Me![Childcare].Visible = False
Me![Eastside].Visible = False
Me![Nursery].Visible = False
Me![DCES].Visible = False
Me![MS].Visible = False
Me![HS].Visible = False
Me![9th].Visible = False
Me![10th].Visible = False
Me![11th].Visible = False
Me![12th].Visible = False
Me![NumberofClasses].Visible = False
Me![AcademicSupport].Visible = False
Me![HomeEdISP].Visible = False
Me![GymLT].Visible = False
Me![GymDCS].Visible = False
Me![Dance].Visible = False
Me![Cheer].Visible = False
Me![GymClub].Visible = False
Me![Enrichment].Visible = False
Me![PeachFactory].Visible = False
Me![DCSTotal].Visible = False
Me.NextRecord = False
Else

Me![LTTotalLabel].Visible = False
Me![ChildcareLabel].Visible = False
Me![EastsideLabel].Visible = False
Me![NurseryLabel].Visible = False
Me![DCESLabel].Visible = False
Me![MSLabel].Visible = False
Me![HSLabel].Visible = False
Me![9thLabel].Visible = False
Me![10thLabel].Visible = False
Me![11thLabel].Visible = False
Me![12thLabel].Visible = False
Me![NumberofClassesLabel].Visible = False
Me![AcademicSupportLabel].Visible = False
Me![HomeEdISPLabel].Visible = False
Me![GymLTLabel].Visible = False
Me![GymDCSLabel].Visible = False
Me![DanceLabel].Visible = False
Me![CheerLabel].Visible = False
Me![GymClubLabel].Visible = False
Me![EnrichmentLabel].Visible = False
Me![PeachFactoryLabel].Visible = False
Me![DCSTotalLabel].Visible = False
Me![LTTotal].Visible = True
Me![Childcare].Visible = True
Me![Eastside].Visible = True
Me![Nursery].Visible = True
Me![DCES].Visible = True
Me![MS].Visible = True
Me![HS].Visible = True
Me![9th].Visible = True
Me![10th].Visible = True
Me![11th].Visible = True
Me![12th].Visible = True
Me![NumberofClasses].Visible = True
Me![AcademicSupport].Visible = True
Me![HomeEdISP].Visible = True
Me![GymLT].Visible = True
Me![GymDCS].Visible = True
Me![Dance].Visible = True
Me![Cheer].Visible = True
Me![GymClub].Visible = True
Me![Enrichment].Visible = True
Me![PeachFactory].Visible = True
Me![DCSTotal].Visible = True
End If
End Sub
 
M

Marshall Barton

The 2 in the line:
If Me.Left < (2 * 1440) Then
must be set to something less then the column width. Try
using:
If Me.Left < (.5 * 1440) Then
--
Marsh
MVP [MS Access]

You were absolutely right about the NextRecord = False. That fixed that
data problem. I am still having problems with the number of columns on the
report. I still can't get all 12 columns to show up. I can use page set up
to set 12 columns, but I can't use a width of less than 1.5. If I go to 1.4,
it will add a second column of labels, right next to the first, and then will
add 4 more columns of data, with plenty of room between each. I've tried
changing the size of my labels, but it still stays the same.
Here is the code I used, which is working great except for the columns.
Option Compare Database

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Left < (2 * 1440) Then
Me![LTTotalLabel].Visible = True
Me![ChildcareLabel].Visible = True
Me![EastsideLabel].Visible = True
Me![NurseryLabel].Visible = True
Me![DCESLabel].Visible = True
Me![MSLabel].Visible = True
Me![HSLabel].Visible = True
Me![9thLabel].Visible = True
Me![10thLabel].Visible = True
Me![11thLabel].Visible = True
Me![12thLabel].Visible = True
Me![NumberofClassesLabel].Visible = True
Me![AcademicSupportLabel].Visible = True
Me![HomeEdISPLabel].Visible = True
Me![GymLTLabel].Visible = True
Me![GymDCSLabel].Visible = True
Me![DanceLabel].Visible = True
Me![CheerLabel].Visible = True
Me![GymClubLabel].Visible = True
Me![EnrichmentLabel].Visible = True
Me![PeachFactoryLabel].Visible = True
Me![DCSTotalLabel].Visible = True
Me![LTTotal].Visible = False
Me![Childcare].Visible = False
Me![Eastside].Visible = False
Me![Nursery].Visible = False
Me![DCES].Visible = False
Me![MS].Visible = False
Me![HS].Visible = False
Me![9th].Visible = False
Me![10th].Visible = False
Me![11th].Visible = False
Me![12th].Visible = False
Me![NumberofClasses].Visible = False
Me![AcademicSupport].Visible = False
Me![HomeEdISP].Visible = False
Me![GymLT].Visible = False
Me![GymDCS].Visible = False
Me![Dance].Visible = False
Me![Cheer].Visible = False
Me![GymClub].Visible = False
Me![Enrichment].Visible = False
Me![PeachFactory].Visible = False
Me![DCSTotal].Visible = False
Me.NextRecord = False
Else

Me![LTTotalLabel].Visible = False
Me![ChildcareLabel].Visible = False
Me![EastsideLabel].Visible = False
Me![NurseryLabel].Visible = False
Me![DCESLabel].Visible = False
Me![MSLabel].Visible = False
Me![HSLabel].Visible = False
Me![9thLabel].Visible = False
Me![10thLabel].Visible = False
Me![11thLabel].Visible = False
Me![12thLabel].Visible = False
Me![NumberofClassesLabel].Visible = False
Me![AcademicSupportLabel].Visible = False
Me![HomeEdISPLabel].Visible = False
Me![GymLTLabel].Visible = False
Me![GymDCSLabel].Visible = False
Me![DanceLabel].Visible = False
Me![CheerLabel].Visible = False
Me![GymClubLabel].Visible = False
Me![EnrichmentLabel].Visible = False
Me![PeachFactoryLabel].Visible = False
Me![DCSTotalLabel].Visible = False
Me![LTTotal].Visible = True
Me![Childcare].Visible = True
Me![Eastside].Visible = True
Me![Nursery].Visible = True
Me![DCES].Visible = True
Me![MS].Visible = True
Me![HS].Visible = True
Me![9th].Visible = True
Me![10th].Visible = True
Me![11th].Visible = True
Me![12th].Visible = True
Me![NumberofClasses].Visible = True
Me![AcademicSupport].Visible = True
Me![HomeEdISP].Visible = True
Me![GymLT].Visible = True
Me![GymDCS].Visible = True
Me![Dance].Visible = True
Me![Cheer].Visible = True
Me![GymClub].Visible = True
Me![Enrichment].Visible = True
Me![PeachFactory].Visible = True
Me![DCSTotal].Visible = True
End If
End Sub

Marshall Barton said:
If you're referring to the article I'm thinking of, it
sounds like you did not use the code from the article
correctly. Maybe you forgot the NextRecord = False line
and/or setting some of the Visible properties??

BTW, you can use Page Setup to set the number of columns to
12 easily enough, but don't to set the column width to a
small enough value so all 12 columns fit netween the
margins.
 
G

Guest

Ok, it's getting better but still a problem. I changed the 2 to .5, then I
changed the columns to .5. I now have data (.5 inches apart) but I have lost
my lablels. I swear those are the only 2 things I changed.

Marshall Barton said:
The 2 in the line:
If Me.Left < (2 * 1440) Then
must be set to something less then the column width. Try
using:
If Me.Left < (.5 * 1440) Then
--
Marsh
MVP [MS Access]

You were absolutely right about the NextRecord = False. That fixed that
data problem. I am still having problems with the number of columns on the
report. I still can't get all 12 columns to show up. I can use page set up
to set 12 columns, but I can't use a width of less than 1.5. If I go to 1.4,
it will add a second column of labels, right next to the first, and then will
add 4 more columns of data, with plenty of room between each. I've tried
changing the size of my labels, but it still stays the same.
Here is the code I used, which is working great except for the columns.
Option Compare Database

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Left < (2 * 1440) Then
Me![LTTotalLabel].Visible = True
Me![ChildcareLabel].Visible = True
Me![EastsideLabel].Visible = True
Me![NurseryLabel].Visible = True
Me![DCESLabel].Visible = True
Me![MSLabel].Visible = True
Me![HSLabel].Visible = True
Me![9thLabel].Visible = True
Me![10thLabel].Visible = True
Me![11thLabel].Visible = True
Me![12thLabel].Visible = True
Me![NumberofClassesLabel].Visible = True
Me![AcademicSupportLabel].Visible = True
Me![HomeEdISPLabel].Visible = True
Me![GymLTLabel].Visible = True
Me![GymDCSLabel].Visible = True
Me![DanceLabel].Visible = True
Me![CheerLabel].Visible = True
Me![GymClubLabel].Visible = True
Me![EnrichmentLabel].Visible = True
Me![PeachFactoryLabel].Visible = True
Me![DCSTotalLabel].Visible = True
Me![LTTotal].Visible = False
Me![Childcare].Visible = False
Me![Eastside].Visible = False
Me![Nursery].Visible = False
Me![DCES].Visible = False
Me![MS].Visible = False
Me![HS].Visible = False
Me![9th].Visible = False
Me![10th].Visible = False
Me![11th].Visible = False
Me![12th].Visible = False
Me![NumberofClasses].Visible = False
Me![AcademicSupport].Visible = False
Me![HomeEdISP].Visible = False
Me![GymLT].Visible = False
Me![GymDCS].Visible = False
Me![Dance].Visible = False
Me![Cheer].Visible = False
Me![GymClub].Visible = False
Me![Enrichment].Visible = False
Me![PeachFactory].Visible = False
Me![DCSTotal].Visible = False
Me.NextRecord = False
Else

Me![LTTotalLabel].Visible = False
Me![ChildcareLabel].Visible = False
Me![EastsideLabel].Visible = False
Me![NurseryLabel].Visible = False
Me![DCESLabel].Visible = False
Me![MSLabel].Visible = False
Me![HSLabel].Visible = False
Me![9thLabel].Visible = False
Me![10thLabel].Visible = False
Me![11thLabel].Visible = False
Me![12thLabel].Visible = False
Me![NumberofClassesLabel].Visible = False
Me![AcademicSupportLabel].Visible = False
Me![HomeEdISPLabel].Visible = False
Me![GymLTLabel].Visible = False
Me![GymDCSLabel].Visible = False
Me![DanceLabel].Visible = False
Me![CheerLabel].Visible = False
Me![GymClubLabel].Visible = False
Me![EnrichmentLabel].Visible = False
Me![PeachFactoryLabel].Visible = False
Me![DCSTotalLabel].Visible = False
Me![LTTotal].Visible = True
Me![Childcare].Visible = True
Me![Eastside].Visible = True
Me![Nursery].Visible = True
Me![DCES].Visible = True
Me![MS].Visible = True
Me![HS].Visible = True
Me![9th].Visible = True
Me![10th].Visible = True
Me![11th].Visible = True
Me![12th].Visible = True
Me![NumberofClasses].Visible = True
Me![AcademicSupport].Visible = True
Me![HomeEdISP].Visible = True
Me![GymLT].Visible = True
Me![GymDCS].Visible = True
Me![Dance].Visible = True
Me![Cheer].Visible = True
Me![GymClub].Visible = True
Me![Enrichment].Visible = True
Me![PeachFactory].Visible = True
Me![DCSTotal].Visible = True
End If
End Sub

Kelly wrote:
I'm sorry if this has already been addressed. I'm a newbie, soon to graduate
to beginner. I am making a columnar report, following the directions I found
for making labels on the left. It worked!! I was very surprised! My
problem is that I want to have 12 columns on one page. If I change the width
of the column on my page setup it then makes 2 columns of labels and then my
data on 2 columns. Also, according to my directions, it said to place my
label and my text boxes on top of each other. I think this is causing my
first column of data not to show. Does anyone have any tips of finishing
touches I can do to make this thing work?
Marshall Barton said:
If you're referring to the article I'm thinking of, it
sounds like you did not use the code from the article
correctly. Maybe you forgot the NextRecord = False line
and/or setting some of the Visible properties??

BTW, you can use Page Setup to set the number of columns to
12 easily enough, but don't to set the column width to a
small enough value so all 12 columns fit netween the
margins.
 
G

Guest

Well, I changed my left margin, and we are in business. Thank you so much
for your help, I am really quite excited about doing this. I'm showing it to
all my coworkers as if I had just won the lottery.

Thanks again.

Kelly said:
Ok, it's getting better but still a problem. I changed the 2 to .5, then I
changed the columns to .5. I now have data (.5 inches apart) but I have lost
my lablels. I swear those are the only 2 things I changed.

Marshall Barton said:
The 2 in the line:
If Me.Left < (2 * 1440) Then
must be set to something less then the column width. Try
using:
If Me.Left < (.5 * 1440) Then
--
Marsh
MVP [MS Access]

You were absolutely right about the NextRecord = False. That fixed that
data problem. I am still having problems with the number of columns on the
report. I still can't get all 12 columns to show up. I can use page set up
to set 12 columns, but I can't use a width of less than 1.5. If I go to 1.4,
it will add a second column of labels, right next to the first, and then will
add 4 more columns of data, with plenty of room between each. I've tried
changing the size of my labels, but it still stays the same.
Here is the code I used, which is working great except for the columns.
Option Compare Database

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Left < (2 * 1440) Then
Me![LTTotalLabel].Visible = True
Me![ChildcareLabel].Visible = True
Me![EastsideLabel].Visible = True
Me![NurseryLabel].Visible = True
Me![DCESLabel].Visible = True
Me![MSLabel].Visible = True
Me![HSLabel].Visible = True
Me![9thLabel].Visible = True
Me![10thLabel].Visible = True
Me![11thLabel].Visible = True
Me![12thLabel].Visible = True
Me![NumberofClassesLabel].Visible = True
Me![AcademicSupportLabel].Visible = True
Me![HomeEdISPLabel].Visible = True
Me![GymLTLabel].Visible = True
Me![GymDCSLabel].Visible = True
Me![DanceLabel].Visible = True
Me![CheerLabel].Visible = True
Me![GymClubLabel].Visible = True
Me![EnrichmentLabel].Visible = True
Me![PeachFactoryLabel].Visible = True
Me![DCSTotalLabel].Visible = True
Me![LTTotal].Visible = False
Me![Childcare].Visible = False
Me![Eastside].Visible = False
Me![Nursery].Visible = False
Me![DCES].Visible = False
Me![MS].Visible = False
Me![HS].Visible = False
Me![9th].Visible = False
Me![10th].Visible = False
Me![11th].Visible = False
Me![12th].Visible = False
Me![NumberofClasses].Visible = False
Me![AcademicSupport].Visible = False
Me![HomeEdISP].Visible = False
Me![GymLT].Visible = False
Me![GymDCS].Visible = False
Me![Dance].Visible = False
Me![Cheer].Visible = False
Me![GymClub].Visible = False
Me![Enrichment].Visible = False
Me![PeachFactory].Visible = False
Me![DCSTotal].Visible = False
Me.NextRecord = False
Else

Me![LTTotalLabel].Visible = False
Me![ChildcareLabel].Visible = False
Me![EastsideLabel].Visible = False
Me![NurseryLabel].Visible = False
Me![DCESLabel].Visible = False
Me![MSLabel].Visible = False
Me![HSLabel].Visible = False
Me![9thLabel].Visible = False
Me![10thLabel].Visible = False
Me![11thLabel].Visible = False
Me![12thLabel].Visible = False
Me![NumberofClassesLabel].Visible = False
Me![AcademicSupportLabel].Visible = False
Me![HomeEdISPLabel].Visible = False
Me![GymLTLabel].Visible = False
Me![GymDCSLabel].Visible = False
Me![DanceLabel].Visible = False
Me![CheerLabel].Visible = False
Me![GymClubLabel].Visible = False
Me![EnrichmentLabel].Visible = False
Me![PeachFactoryLabel].Visible = False
Me![DCSTotalLabel].Visible = False
Me![LTTotal].Visible = True
Me![Childcare].Visible = True
Me![Eastside].Visible = True
Me![Nursery].Visible = True
Me![DCES].Visible = True
Me![MS].Visible = True
Me![HS].Visible = True
Me![9th].Visible = True
Me![10th].Visible = True
Me![11th].Visible = True
Me![12th].Visible = True
Me![NumberofClasses].Visible = True
Me![AcademicSupport].Visible = True
Me![HomeEdISP].Visible = True
Me![GymLT].Visible = True
Me![GymDCS].Visible = True
Me![Dance].Visible = True
Me![Cheer].Visible = True
Me![GymClub].Visible = True
Me![Enrichment].Visible = True
Me![PeachFactory].Visible = True
Me![DCSTotal].Visible = True
End If
End Sub


Kelly wrote:
I'm sorry if this has already been addressed. I'm a newbie, soon to graduate
to beginner. I am making a columnar report, following the directions I found
for making labels on the left. It worked!! I was very surprised! My
problem is that I want to have 12 columns on one page. If I change the width
of the column on my page setup it then makes 2 columns of labels and then my
data on 2 columns. Also, according to my directions, it said to place my
label and my text boxes on top of each other. I think this is causing my
first column of data not to show. Does anyone have any tips of finishing
touches I can do to make this thing work?

:
If you're referring to the article I'm thinking of, it
sounds like you did not use the code from the article
correctly. Maybe you forgot the NextRecord = False line
and/or setting some of the Visible properties??

BTW, you can use Page Setup to set the number of columns to
12 easily enough, but don't to set the column width to a
small enough value so all 12 columns fit netween the
margins.
 
M

Marshall Barton

Getting something this complex to work is pretty exciting
and you deserve to exibit some elation.

Don't forget that that number must be less than the column
width. When you changed the column width to .5, you reduced
it right to the edge of not working again. I think you can
use any small value (eg .1) and it should be all right for
any practical column width. Actually, you could probably
change the If to:

If Me.Left = 0 Then

and avoid the depencey on the column width.
--
Marsh
MVP [MS Access]

Well, I changed my left margin, and we are in business. Thank you so much
for your help, I am really quite excited about doing this. I'm showing it to
all my coworkers as if I had just won the lottery.


Kelly said:
Ok, it's getting better but still a problem. I changed the 2 to .5, then I
changed the columns to .5. I now have data (.5 inches apart) but I have lost
my lablels. I swear those are the only 2 things I changed.

Marshall Barton said:
The 2 in the line:
If Me.Left < (2 * 1440) Then
must be set to something less then the column width. Try
using:
If Me.Left < (.5 * 1440) Then


Kelly wrote:
You were absolutely right about the NextRecord = False. That fixed that
data problem. I am still having problems with the number of columns on the
report. I still can't get all 12 columns to show up. I can use page set up
to set 12 columns, but I can't use a width of less than 1.5. If I go to 1.4,
it will add a second column of labels, right next to the first, and then will
add 4 more columns of data, with plenty of room between each. I've tried
changing the size of my labels, but it still stays the same.
Here is the code I used, which is working great except for the columns.
Option Compare Database

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Left < (2 * 1440) Then
Me![LTTotalLabel].Visible = True
Me![ChildcareLabel].Visible = True
Me![EastsideLabel].Visible = True
Me![NurseryLabel].Visible = True
Me![DCESLabel].Visible = True
Me![MSLabel].Visible = True
Me![HSLabel].Visible = True
Me![9thLabel].Visible = True
Me![10thLabel].Visible = True
Me![11thLabel].Visible = True
Me![12thLabel].Visible = True
Me![NumberofClassesLabel].Visible = True
Me![AcademicSupportLabel].Visible = True
Me![HomeEdISPLabel].Visible = True
Me![GymLTLabel].Visible = True
Me![GymDCSLabel].Visible = True
Me![DanceLabel].Visible = True
Me![CheerLabel].Visible = True
Me![GymClubLabel].Visible = True
Me![EnrichmentLabel].Visible = True
Me![PeachFactoryLabel].Visible = True
Me![DCSTotalLabel].Visible = True
Me![LTTotal].Visible = False
Me![Childcare].Visible = False
Me![Eastside].Visible = False
Me![Nursery].Visible = False
Me![DCES].Visible = False
Me![MS].Visible = False
Me![HS].Visible = False
Me![9th].Visible = False
Me![10th].Visible = False
Me![11th].Visible = False
Me![12th].Visible = False
Me![NumberofClasses].Visible = False
Me![AcademicSupport].Visible = False
Me![HomeEdISP].Visible = False
Me![GymLT].Visible = False
Me![GymDCS].Visible = False
Me![Dance].Visible = False
Me![Cheer].Visible = False
Me![GymClub].Visible = False
Me![Enrichment].Visible = False
Me![PeachFactory].Visible = False
Me![DCSTotal].Visible = False
Me.NextRecord = False
Else

Me![LTTotalLabel].Visible = False
Me![ChildcareLabel].Visible = False
Me![EastsideLabel].Visible = False
Me![NurseryLabel].Visible = False
Me![DCESLabel].Visible = False
Me![MSLabel].Visible = False
Me![HSLabel].Visible = False
Me![9thLabel].Visible = False
Me![10thLabel].Visible = False
Me![11thLabel].Visible = False
Me![12thLabel].Visible = False
Me![NumberofClassesLabel].Visible = False
Me![AcademicSupportLabel].Visible = False
Me![HomeEdISPLabel].Visible = False
Me![GymLTLabel].Visible = False
Me![GymDCSLabel].Visible = False
Me![DanceLabel].Visible = False
Me![CheerLabel].Visible = False
Me![GymClubLabel].Visible = False
Me![EnrichmentLabel].Visible = False
Me![PeachFactoryLabel].Visible = False
Me![DCSTotalLabel].Visible = False
Me![LTTotal].Visible = True
Me![Childcare].Visible = True
Me![Eastside].Visible = True
Me![Nursery].Visible = True
Me![DCES].Visible = True
Me![MS].Visible = True
Me![HS].Visible = True
Me![9th].Visible = True
Me![10th].Visible = True
Me![11th].Visible = True
Me![12th].Visible = True
Me![NumberofClasses].Visible = True
Me![AcademicSupport].Visible = True
Me![HomeEdISP].Visible = True
Me![GymLT].Visible = True
Me![GymDCS].Visible = True
Me![Dance].Visible = True
Me![Cheer].Visible = True
Me![GymClub].Visible = True
Me![Enrichment].Visible = True
Me![PeachFactory].Visible = True
Me![DCSTotal].Visible = True
End If
End Sub


Kelly wrote:
I'm sorry if this has already been addressed. I'm a newbie, soon to graduate
to beginner. I am making a columnar report, following the directions I found
for making labels on the left. It worked!! I was very surprised! My
problem is that I want to have 12 columns on one page. If I change the width
of the column on my page setup it then makes 2 columns of labels and then my
data on 2 columns. Also, according to my directions, it said to place my
label and my text boxes on top of each other. I think this is causing my
first column of data not to show. Does anyone have any tips of finishing
touches I can do to make this thing work?

:
If you're referring to the article I'm thinking of, it
sounds like you did not use the code from the article
correctly. Maybe you forgot the NextRecord = False line
and/or setting some of the Visible properties??

BTW, you can use Page Setup to set the number of columns to
12 easily enough, but don't to set the column width to a
small enough value so all 12 columns fit netween the
margins.
 

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