2016-08-30 5 views
0

Ich habe viele Diagramme in Excel und ich muss ihr Aussehen ändern. Ich schrieb dieses cscript in VBA, aber es funktioniert nicht:Excel ändern Diagramm Eigenschaften mit VBA

Sub Makro1() 
' 
' Makro1 Makro 
' 

' 
For i = 1 To 28 
    ActiveSheet.ChartObjects("Diagramm " & i).Activate 
    ActiveSheet.Shapes("Diagramm " & i).Line.Visible = msoFalse 
Next i 
End Sub 

Mit diesem Skript ich die Rahmenlinie zu keinem Rahmenlinie zu ändern versuche. Aber es funktioniert nicht und ich kann den Fehler finden. Außerdem muss ich den Namen der Y-Achse ändern. Irgendeine Idee wie kann ich das tun?

+0

Sind Sie sicher, dass Sie haben eine 'Diagramm 1 'Diagramm? – pnuts

+1

@pnuts: meinst du wenn ich die Nummer "1" habe (wenn die Nummerierung meiner Charts bei 1 beginnt) oder wenn sie "Diagramm" heißt? Das "Diagramm" ist das "Chart" für die deutsche Version von Excel. – GeMa

+0

Eine Mischung aus beidem (und ja, ich habe mich gefragt, ob ein Rechtschreibfehler dazu beigetragen haben könnte!) – pnuts

Antwort

0

Nicht sicher, was Sie mit Rahmenlinie meinen, funktioniert Ihr Code, wie es funktioniert, indem Sie den Objektrahmen entfernen.

Y-Achse ist:

ActiveChart.Axes(xlValue, xlPrimary).HasTitle = True 
ActiveChart.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Title Here" 
Verwandte Themen