We are trying to change the font size of the chart size automatically via vba
and have included this:

ActiveChart.ChartTitle.Select

With Selection.Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With

For this code the program doesn't change the formatting of the chart title.
Perhaps you can find the fault...

It works fine here, although you don't need to select something already
selected

With ActiveChart.ChartTitle
With .Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End With


--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Kathl" <(E-Mail Removed)> wrote in message
news:20B9960F-FE98-469B-BC8A-(E-Mail Removed)...
> We are trying to change the font size of the chart size automatically via
> vba
> and have included this:
>
> ActiveChart.ChartTitle.Select
>
> With Selection.Font
> .Name = "Arial"
> .FontStyle = "Bold"
> .Size = 12
> .Strikethrough = False
> .Superscript = False
> .Subscript = False
> .OutlineFont = False
> .Shadow = False
> .Underline = xlUnderlineStyleNone
> .ColorIndex = xlAutomatic
> End With
>
> For this code the program doesn't change the formatting of the chart
> title.
> Perhaps you can find the fault...
>
>

Yeah, thx.

when i delete all this select statements everything's working fine.

"Bob Phillips" wrote:

> It works fine here, although you don't need to select something already
> selected
>
> With ActiveChart.ChartTitle
> With .Font
> .Name = "Arial"
> .FontStyle = "Bold"
> .Size = 12
> .Strikethrough = False
> .Superscript = False
> .Subscript = False
> .OutlineFont = False
> .Shadow = False
> .Underline = xlUnderlineStyleNone
> .ColorIndex = xlAutomatic
> End With
> End With
>
>
> --
> ---
> HTH
>
> Bob
>
>
> (there's no email, no snail mail, but somewhere should be gmail in my addy)
>
>
>
> "Kathl" <(E-Mail Removed)> wrote in message
> news:20B9960F-FE98-469B-BC8A-(E-Mail Removed)...
> > We are trying to change the font size of the chart size automatically via
> > vba
> > and have included this:
> >
> > ActiveChart.ChartTitle.Select
> >
> > With Selection.Font
> > .Name = "Arial"
> > .FontStyle = "Bold"
> > .Size = 12
> > .Strikethrough = False
> > .Superscript = False
> > .Subscript = False
> > .OutlineFont = False
> > .Shadow = False
> > .Underline = xlUnderlineStyleNone
> > .ColorIndex = xlAutomatic
> > End With
> >
> > For this code the program doesn't change the formatting of the chart
> > title.
> > Perhaps you can find the fault...
> >
> >
>
>
>