title: Remove data label if less than a value
body: <p>I have datalabels I've applied to a chart and now I am trying to remove those lables that are less than 1%. Here is what I have -</p>
  
  <pre><code>Dim cht As Chart
  
  Set cht = ActiveChart
  
  
  If Range("B8") &lt; 0.01 Then
      cht.SeriesCollection(1).DataLabels.Select
      Selection.Delete
  End If
  </code></pre>
  
  <p>I am not quite sure what I am doing wrong, but all the data labels are removed. Do you know why? Thanks!</p>