title: Autofilter for multiple fields in VBA
body: <p>I'm trying to apply an autofilter to a set of data that filters by two columns.  Is there a more efficient way than what I've written below that processes both fields in one statement rather than having to write another block that's effectively the same and making the code quite lengthy?</p>
  
  <pre><code>Range("A1").CurrentRegion.AutoFilter _
  Field:=5, _
  Criteria1:="1", _
  VisibleDropDown:=True
  
  Range("A1").CurrentRegion.AutoFilter _
  Field:=6, _
  Criteria1:="&gt;0", _
  VisibleDropDown:=True
  </code></pre>