title: Filter items with certain text in a Pivot Table using VBA
body: <p>I've been trying to build a code to filter all items within a Pivot Table which contain a specific text fragment. I initially imagined I could use asterisks (*) to indicate any string before or after my text, but VBA reads that as a character instead. This is necessary to display the Pivot Table array in a Userform Listbox. Look what I tried:</p>
  
  <pre><code>Sub FilterCstomers()
  
      Dim f As String: f = InputBox("Type the text you want to filter:")
  
      With Sheets("Customers Pivot").PivotTables("Customers_PivotTable")
          .ClearAllFilters
          .PivotFields("Concatenation for filtering").CurrentPage = "*f*"
          End With
  
  End Sub
  </code></pre>