[SOLVED] EXCEL how to change the NAME of a specific Chart

[opus]

How is it possible to change the name of a specific existing Chart in EXCEL using VBA?

The code should be

Charts(x).Name="BlaBla"

My problem is how can I determine the x (i.e. the Number of the Chart-Object)? Since the code could be used several times the number will change.
To make it easy, the setting of the name could be done wwhen creating the chart (or just after the " Chart.add").

Thanks

[alex_read]

Hi Opus, you could check this by looping through each chart in the collection & evaluating the name there ...

Private Sub CommandButton1_Click()
    Dim intLoopCounter As Integer
    
    For intLoopCounter = 1 To Workbooks(1).Charts.Count
        If (Charts(intLoopCounter).Name = "Chart1") Then
            Charts(intLoopCounter).Name = "Cartman"
        End If
    Next
End Sub

[alex_read]

Or you can use this method of doing the same thing - I've just checked this out & certainly in Excel 2000, the argument you pass to the charts collection can either be a string representing the name of a specific chart, or it can be a number index of the chart within the collection...

Private Sub CommandButton1_Click()
    Workbooks(1).Charts("Chart1").Name = "Cartman"
End Sub

[alex_read]

Finally, to set this property via code when you create the cart, you can use this one:

Private Sub CommandButton1_Click()
   Workbooks(1).Charts.Add
    With ActiveChart
        .ChartType = xlColumnClustered
        .SetSourceData Source:=Sheets("Sheet1").Range("A1:A5"), _
        PlotBy:=xlColumns
        .HasLegend = True
        .Legend.Select
        .Legend.Position = xlRight
        [b].Name = "Cartman"[/b]
    End With 
End Sub

Hope this helps!

[opus]

Thanks Alex