From: Summing multiple fields on a form on
I want to display a chart on a report. I created a query named qryJanGraph,
which contains 2 fields [SignInDte]& the other is a calculated field name
[TotalStudents]. The expression used in the query for the calc field
[TotalStudents] was sum([Current]+[New]). I placed the 2 fields on the report
in the Detail Section, along with a Rectangle Bar and added an Event
Procedure in OnFormat. It reads
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
End Sub
Whn I run the report the Bars for all the numbers are the same...HELP
From: Duane Hookom on
What Access version and what view when you "run the report"?
What do you see if you print the value to the debug window?
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
debug.Print "Width: " & ([TotalStudents] / 100) * (1440 * 4)
rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
End Sub
Is TotalStudents a text box in the detail section?

--
Duane Hookom
MS Access MVP


"Summing multiple fields on a form"
<Summingmultiplefieldsonaform(a)discussions.microsoft.com> wrote in message
news:83BF9A2A-7040-4C6F-90AA-F42B7A74DD54(a)microsoft.com...
> I want to display a chart on a report. I created a query named
> qryJanGraph,
> which contains 2 fields [SignInDte]& the other is a calculated field name
> [TotalStudents]. The expression used in the query for the calc field
> [TotalStudents] was sum([Current]+[New]). I placed the 2 fields on the
> report
> in the Detail Section, along with a Rectangle Bar and added an Event
> Procedure in OnFormat. It reads
> Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> End Sub
> Whn I run the report the Bars for all the numbers are the same...HELP

From: Summing multiple fields on a form on
I am using Windows 7, Access 2007 and Report View.
I used the Report Wizard to add [SignInDte] and [TotalStudents]
I used the rectangle control to add the rectangle bar to the Detail Section
of the Report.
I am sorry but I don't know how to get to the debug window?

"Duane Hookom" wrote:

> What Access version and what view when you "run the report"?
> What do you see if you print the value to the debug window?
> Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> debug.Print "Width: " & ([TotalStudents] / 100) * (1440 * 4)
> rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> End Sub
> Is TotalStudents a text box in the detail section?
>
> --
> Duane Hookom
> MS Access MVP
>
>
> "Summing multiple fields on a form"
> <Summingmultiplefieldsonaform(a)discussions.microsoft.com> wrote in message
> news:83BF9A2A-7040-4C6F-90AA-F42B7A74DD54(a)microsoft.com...
> > I want to display a chart on a report. I created a query named
> > qryJanGraph,
> > which contains 2 fields [SignInDte]& the other is a calculated field name
> > [TotalStudents]. The expression used in the query for the calc field
> > [TotalStudents] was sum([Current]+[New]). I placed the 2 fields on the
> > report
> > in the Detail Section, along with a Rectangle Bar and added an Event
> > Procedure in OnFormat. It reads
> > Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> > rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> > End Sub
> > Whn I run the report the Bars for all the numbers are the same...HELP
>
From: Duane Hookom on
To view the debug window, press Ctrl+G

--
Duane Hookom
Microsoft Access MVP


"Summing multiple fields on a form" wrote:

> I am using Windows 7, Access 2007 and Report View.
> I used the Report Wizard to add [SignInDte] and [TotalStudents]
> I used the rectangle control to add the rectangle bar to the Detail Section
> of the Report.
> I am sorry but I don't know how to get to the debug window?
>
> "Duane Hookom" wrote:
>
> > What Access version and what view when you "run the report"?
> > What do you see if you print the value to the debug window?
> > Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> > debug.Print "Width: " & ([TotalStudents] / 100) * (1440 * 4)
> > rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> > End Sub
> > Is TotalStudents a text box in the detail section?
> >
> > --
> > Duane Hookom
> > MS Access MVP
> >
> >
> > "Summing multiple fields on a form"
> > <Summingmultiplefieldsonaform(a)discussions.microsoft.com> wrote in message
> > news:83BF9A2A-7040-4C6F-90AA-F42B7A74DD54(a)microsoft.com...
> > > I want to display a chart on a report. I created a query named
> > > qryJanGraph,
> > > which contains 2 fields [SignInDte]& the other is a calculated field name
> > > [TotalStudents]. The expression used in the query for the calc field
> > > [TotalStudents] was sum([Current]+[New]). I placed the 2 fields on the
> > > report
> > > in the Detail Section, along with a Rectangle Bar and added an Event
> > > Procedure in OnFormat. It reads
> > > Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> > > rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> > > End Sub
> > > Whn I run the report the Bars for all the numbers are the same...HELP
> >
From: Summing multiple fields on a form on
Thx Duane for your suggestions. I finally got chart to work on the report.
There were 2 problems.

1. I had the name recBar in the code and didnt change it in the property
sheet.

2. I needed to view it in the Print Preview Mode.

"Duane Hookom" wrote:

> To view the debug window, press Ctrl+G
>
> --
> Duane Hookom
> Microsoft Access MVP
>
>
> "Summing multiple fields on a form" wrote:
>
> > I am using Windows 7, Access 2007 and Report View.
> > I used the Report Wizard to add [SignInDte] and [TotalStudents]
> > I used the rectangle control to add the rectangle bar to the Detail Section
> > of the Report.
> > I am sorry but I don't know how to get to the debug window?
> >
> > "Duane Hookom" wrote:
> >
> > > What Access version and what view when you "run the report"?
> > > What do you see if you print the value to the debug window?
> > > Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> > > debug.Print "Width: " & ([TotalStudents] / 100) * (1440 * 4)
> > > rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> > > End Sub
> > > Is TotalStudents a text box in the detail section?
> > >
> > > --
> > > Duane Hookom
> > > MS Access MVP
> > >
> > >
> > > "Summing multiple fields on a form"
> > > <Summingmultiplefieldsonaform(a)discussions.microsoft.com> wrote in message
> > > news:83BF9A2A-7040-4C6F-90AA-F42B7A74DD54(a)microsoft.com...
> > > > I want to display a chart on a report. I created a query named
> > > > qryJanGraph,
> > > > which contains 2 fields [SignInDte]& the other is a calculated field name
> > > > [TotalStudents]. The expression used in the query for the calc field
> > > > [TotalStudents] was sum([Current]+[New]). I placed the 2 fields on the
> > > > report
> > > > in the Detail Section, along with a Rectangle Bar and added an Event
> > > > Procedure in OnFormat. It reads
> > > > Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> > > > rctBar.Width = ([TotalStudents] / 100) * (1440 * 4)
> > > > End Sub
> > > > Whn I run the report the Bars for all the numbers are the same...HELP
> > >