Frage zu einer Codezeile Charts
03.10.2012 22:30:46
Tim
ich verwende folgende Codezeile, um damit als Teil eines Makros bestimmte Formatierungen der Grafiken auf einem Blatt vorzunehmen.
Kann mir jemand sagen, wie ich die letzte Zeile in folgendem Codeteil ändern muss, damit der Code statt allen Grafiken (Säulendiagramme) nur ein bestimmtes Diagramm formatiert ?
Sub FormatCharts()
Dim objChrt As ChartObject
Dim rPatterns As Range
Dim iPattern As Long
Dim iPoint As Long
Dim vValues As Variant
Dim rValue As Range
With ActiveSheet
Set rPatterns = .Range("AA101:AA105")
For Each objChrt In .ChartObjects
End Sub
Tim
Anzeige