wer kann sich das mal anschauen?
ich möchte die schrift der einezelnen serienCollection (1) usw beeinflussen und auch die grafik gesamt in der darstellung die Höhe und breite weiss aber nicht wie
habe schon mal mit dem ersten angefangen geht aber leider so nicht
.SeriesCollection(1).DataLabels.Font.Size = 8
um eine grafik in einer userform anzeigen zu lassen benutzte ich folgenden code
With cht
.SetSourceData Source:=Sheets("Auswertung1").Range("A1").CurrentRegion, PlotBy:=xlRows
.SeriesCollection(1).Interior.ColorIndex = 3
.SeriesCollection(4).ChartType = xlLineMarkers
.HasLegend = True
.HasTitle = True
.ChartTitle.Characters.Text = "Zwangsbremsungen 2006"
.ChartTitle.Font.Name = "Arial"
.ChartTitle.Font.Size = 18
.ApplyDataLabels Type:=xlDataLabelsShowValue, LegendKey:=False
.Export sFile
End With
gruss achim h.