format graphs in vba

[jess89]

Hi

How can I format a graph in a macro? For example I want no border line surrounding the graph, or change the font to arial.

I tried to get the command by recording, but the recorder doesnt show some formatting comands, like the one stated above.

Thanks in advance.

 

[GlennUK]

Let me guess ... Excel 2007 by any chance?

http://support.microsoft.com/kb/937620

 

[Andrew Poulsom]

You haven't said which object's font you want to change, but here's some code recorded in Excel 2003 that may help you:

Sub Macro2()
'
' Macro2 Macro
' Macro recorded 26/07/2011 by Andrew
'
'
    ActiveSheet.ChartObjects("Chart 2").Activate
    ActiveChart.ChartArea.Select
    With Selection.Border
        .Weight = 2
        .LineStyle = 0
    End With
    Selection.Interior.ColorIndex = xlAutomatic
    Sheets("Sheet1").DrawingObjects("Chart 2").RoundedCorners = False
    Sheets("Sheet1").DrawingObjects("Chart 2").Shadow = False
    ActiveChart.Axes(xlValue).Select
    Selection.TickLabels.AutoScaleFont = True
    With Selection.TickLabels.Font
        .Name = "Arial"
        .FontStyle = "Regular"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
        .Background = xlAutomatic
    End With
End Sub