title: Need VBA Code for Deselect all slicer items
body: <pre><code>ActiveWorkbook.SlicerCaches("Slicer_xxxxx").ClearManualFilter
  </code></pre>
  
  <p>I need to deselect all slicer items.
  I tried this</p>
  
  <pre><code>For i = 1 To numberOfItems
  On Error Resume Next
  .SlicerItems(i).Selected = False
  Next i
  </code></pre>
  
  <p>Please help</p>