title: Trying to filter the single column without disturbing the rest of
body: <p>I just want to filter the single column without disturbing the rest of columns i have been using below code but it is not applying on sheet.</p>
  <p>Which is giving an error can someone please help me to do this.</p>
  <p>I also wants to filter it Large to smallest values just single column.</p>
  <p>Any help over the problem will be greatly appreciated.</p>
  <pre><code>        Sub Filter()
  Application.ScreenUpdating = False
  
  Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets(&quot;Sheet1&quot;) 'Put your sheet name inside the quotes
  With ws
    If Not .AutoFilterMode Then .Range(&quot;B1:B&quot;).AutoFilter
       .Range(&quot;B&quot;).AutoFilter Field:=2, Criteria1:=&quot;&gt;100&quot;
       .AutoFilterMode = False
       .Range(&quot;B&quot;).AutoFilter Field:=2, Criteria1:=&quot;&lt;5000&quot;
       .AutoFilterMode = False
  End With
  
  Application.ScreenUpdating = True
  End Sub
  </code></pre>