Boa noite Zgoda,

Clique em cima do Gráfico -> Design -> Selecionar Dados -> Na 'Entrada de Legendas (Série)' -> Desmarque as '< séries vazias >' ou delete.

*Se tiver muitas vazias, vai ser chato ficar alterando por esse caminho.

*Meu Office é o 2016.

att,

Boa tarde!
Se quiser deixar automático com VBA:

Sub RemoveZeros()
     
    Dim lngIndex As Long
    Dim vntValues As Variant
    Dim blnRemove As Boolean
    Dim lngPointIndex As Long
     
    With ActiveChart
        For lngIndex = .SeriesCollection.Count To 4 Step -1
            With .SeriesCollection(lngIndex)
                vntValues = .Values
                blnRemove = True
                For lngPointIndex = LBound(vntValues) To UBound(vntValues)
                    If vntValues(lngPointIndex) <> 0 Then
                        blnRemove = False
                        Exit For
                    End If
                Next
                 If blnRemove Then .Delete
            End With
        Next
    End With
End Sub

Créditos para site: Ozgrid
Doni