moin bzw guten Abend,
also, ich habe ein Diagramm erzeugt, bzw. ein Programm dass dieses erzeugt.
Nun will ich es anpassen, bloss die schriften sind zu groß und ihc komme gerade einfach nicht weiter...
könnt ihr mir helfen?
so siehts bisher aus(sontige verbesserungen sind auch willkommen ;)) :
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection.NewSeries
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).XValues = Worksheets("E1").Cells(Index, 1)
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).Values = Worksheets("E1").Cells(Index, 2)
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).Name = Worksheets("E1").Cells(Index, 10)
Worksheets("D1").ChartObjects("D1").Chart.ChartType = xlBubble3DEffect
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).BubbleScale = 40
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).ColorIndex = 37
so, das problem liegt in der names zeile, diese schrift ist zu groß :( und irgendwie bekomme ich es auch mit dem Makrorecorder nicht heraus wie es besser geht...wie stelle ich die Size ein?
habe es schon hiermit versucht geht aber nicht :
Worksheets("D1").ChartObjects("D1").Chart.SeriesCollection(Index).Name.Size = 8
weiß jemand rat?
mfg
torsten