Mehrere Linien in Excel Liniendiagramm formatieren

Computer: Software & Programmierung Office Software
1

Guten Tag,
ich habe Liniendiagramm mit 87 Linien. Eigentlich brauche ich davon nur die Punkte ohne die Linien. Diese werden aber in einem Punktediagramm falsch dargestellt da ein Punktediagramm für meinen Wunsch auch nicht geeignet ist.

Nun möchte ich gerne alle Linien gleichzeitig formatieren können und nicht jede einzeln. Geht das irgendwie? (Beim Formatieren würde ich die Linienfarbe auf „keine Linien“ stellen)

Danke für jede Antwort

2

Hallo,

ich habe zwar nur mäßige Erfahrungen im Umgang mit Diagrammen über VBA, aber versuche mal folgenden Code:

Sub TestDia()
For a = 1 To ActiveChart.SeriesCollection.Count
ActiveChart.SeriesCollection(a).Select
With Selection.Border
.LineStyle = xlNone
End With
Next
End Sub

3

Hallo Dave,

manuell geht es meines Wissens nicht.
Probiere mal das folgende Makro.

Gruß
Franz

Sub LinienDiagramm\_nur\_Punkte()
 'Erstellt unter Excel 2007
 ' LinienDiagramm\_nur\_Punkte
 Dim objChart As Chart, Reihe As Series
 If ActiveSheet.Type = xlWorksheet Then
 Set objChart = ActiveSheet.ChartObjects(1).Chart 'Eingebettes Diagramm
 Else
 Set objChart = ActiveSheet 'Diagramm auf separatem Blatt
 End If
 For Each Reihe In objChart.SeriesCollection
 Reihe.Format.Line.Visible = msoFalse
 Next
End Sub