Remove or Hide or Delete Negative Bubbles

Hi Rajan:

Hope you are doing good.

In a data sheet we have negative values. I dont wanna see them in my bubble chart. Please let me know how to eliminate the negative bubble in the Bubble Chart.

Please find attached the dummy sheet (Data and Chart)

Thanks in advance.

hi,
what kind of solution do you need,VBA? Without VBA?

Quote:

---

Originally Posted by Rajan_Verma

hi,
what kind of solution do you need,VBA? Without VBA?

---

VBA only ie for active chart if there are any bubbles with negative values delete or hide them

Regards

i have seen that file.. You just need to replace Negative values by #N/A, All negative points will be hidden on chart

Thanks
Rajan

Yes Rajan!, Also please dont use Hide/Unhide alogrithm.

Thanks :)

Try this

Code:

---

Sub HideBubble()

    Dim obj As Series, intI As Integer
   
    For Each obj In ActiveSheet.ChartObjects(1).Chart.SeriesCollection
        For intI = 1 To obj.Points.Count
            If obj.Values(intI) < 0 And obj.XValues(intI) < 0 Then
                obj.Points(intI).Format.Fill.Visible = msoFalse
            End If
        Next intI
    Next obj
   
End Sub

---

Also, please ensure you start a new thread for a new query, unless it is exactly in line with what was being discussed. You may add a reference to the original thread if need be. I've moved this to a new thread.