Prev: Need help with programming again
Next: VBA code to call first date of the year and last date of the year
From: nathan_savidge on 15 Apr 2010 04:47
Hi,

I currently have a chart grpQuickLook on a form in Access. I am setting the
row source of this based on the selection made by the user. If they select
to add data by an individual, it will show the individuals chart and if they
select to add data by a team, then it will show the team data.

This is the code i have used

..grpQuickLook.RowSource = "SELECT tbl_Metrics_Data_Entry.dt_Date_Entered,
Sum(tbl_Metrics_Data_Entry.intVolume) AS Volumes, " & _

"Sum(tbl_Metrics_Data_Entry.intTime) AS Timings FROM tbl_Metrics_Data_Entry "
& _
"WHERE
(((tbl_Metrics_Data_Entry.Team_ID) = " & .cboTeams & ")) " & _
"GROUP BY
tbl_Metrics_Data_Entry.dt_Date_Entered;"
..grpQuickLook.HasTitle = True
..grpQuickLook.charttitle.Caption = .cboTeams.Column(1) & " Summary Chart"


The code errors on the hastitle and the caption lines. I have read
somewhere that i may need to add series' back in to the chart, but am unsure
of this. The error message says can not set the property.

TIA

Nathan.

From: george 16-17 on 15 Apr 2010 08:16
Nathan,

I am not an expert, but try:

With Me.grpQuickLook.Object.Application.Chart
Me.grpQuickLook.HasTitle = True
Me.grpQuickLook.chartTitle.Text = Me.cboTeams.Column(1) & " Summary Chart"
End with

Let me know if this helps.

george

"nathan_savidge" wrote:

> Hi,
>
> I currently have a chart grpQuickLook on a form in Access. I am setting the
> row source of this based on the selection made by the user. If they select
> to add data by an individual, it will show the individuals chart and if they
> select to add data by a team, then it will show the team data.
>
> This is the code i have used
>
> .grpQuickLook.RowSource = "SELECT tbl_Metrics_Data_Entry.dt_Date_Entered,
> Sum(tbl_Metrics_Data_Entry.intVolume) AS Volumes, " & _
>
> "Sum(tbl_Metrics_Data_Entry.intTime) AS Timings FROM tbl_Metrics_Data_Entry "
> & _
> "WHERE
> (((tbl_Metrics_Data_Entry.Team_ID) = " & .cboTeams & ")) " & _
> "GROUP BY
> tbl_Metrics_Data_Entry.dt_Date_Entered;"
> .grpQuickLook.HasTitle = True
> .grpQuickLook.charttitle.Caption = .cboTeams.Column(1) & " Summary Chart"
>
>
> The code errors on the hastitle and the caption lines. I have read
> somewhere that i may need to add series' back in to the chart, but am unsure
> of this. The error message says can not set the property.
>
> TIA
>
> Nathan.
>
From: george 16-17 on 15 Apr 2010 08:23
Oops...hit the post button too quick...a little shorter code:

With Me.grpQuickLook.Object.Application.Chart
..HasTitle = True
..ChartTitle.Text = Me.cboTeams.Column(1) & " Summary Chart"
End with


"george 16-17" wrote:

> Nathan,
>
> I am not an expert, but try:
>
> With Me.grpQuickLook.Object.Application.Chart
> Me.grpQuickLook.HasTitle = True
> Me.grpQuickLook.chartTitle.Text = Me.cboTeams.Column(1) & " Summary Chart"
> End with
>
> Let me know if this helps.
>
> george
>
> "nathan_savidge" wrote:
>
> > Hi,
> >
> > I currently have a chart grpQuickLook on a form in Access. I am setting the
> > row source of this based on the selection made by the user. If they select
> > to add data by an individual, it will show the individuals chart and if they
> > select to add data by a team, then it will show the team data.
> >
> > This is the code i have used
> >
> > .grpQuickLook.RowSource = "SELECT tbl_Metrics_Data_Entry.dt_Date_Entered,
> > Sum(tbl_Metrics_Data_Entry.intVolume) AS Volumes, " & _
> >
> > "Sum(tbl_Metrics_Data_Entry.intTime) AS Timings FROM tbl_Metrics_Data_Entry "
> > & _
> > "WHERE
> > (((tbl_Metrics_Data_Entry.Team_ID) = " & .cboTeams & ")) " & _
> > "GROUP BY
> > tbl_Metrics_Data_Entry.dt_Date_Entered;"
> > .grpQuickLook.HasTitle = True
> > .grpQuickLook.charttitle.Caption = .cboTeams.Column(1) & " Summary Chart"
> >
> >
> > The code errors on the hastitle and the caption lines. I have read
> > somewhere that i may need to add series' back in to the chart, but am unsure
> > of this. The error message says can not set the property.
> >
> > TIA
> >
> > Nathan.
> >
 | 
Pages: 1
Prev: Need help with programming again
Next: VBA code to call first date of the year and last date of the year