Makro Diagramm
Teggnodd
ich hab noch ein Problem, ich würde gerne in mein aufgezeichnetes Makro das Hauptgitternetz einfügen per Makrobefehl nur ich habe keine Ahnung wie das funktioniert. Per Aufzeichnung hat es leider nicht funktioniert.
hier mein Makro:
Sub Diagramm()
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "='" & ActiveSheet.Name & "'!$C$4:$C$4099"
ActiveChart.SeriesCollection(1).Values = "='" & ActiveSheet.Name & "'!$B$4:$B$4099"
ActiveChart.SeriesCollection(1).Border.Weight = 1
ActiveChart.Axes(xlCategory).Select
ActiveChart.Legend.Delete
End Sub
Das Makro wurde auch von mir ein wenig veränder.
Gruß