我要删除Excel图形图例中的一些名称。例如,没有显示所有系列1,系列2,系列3等,而是在图例中仅提到了系列1。谢谢。
答案 0 :(得分:1)
尝试此操作,向后循环很重要,因为从1删除到末尾,每个条目的位置都会更新,即如果删除2,则3变为2。
Option Explicit
Sub legendcleaner()
Dim i As Long
With ActiveChart.Legend
If .LegendEntries.Count > 1 Then
For i = .LegendEntries.Count To 2 Step -1
.LegendEntries(i).Delete
Next i
End If
End With
End Sub