title: Greater than in Auto Filter Criteria in VBA
body: <p>How do I use greater than in this code?</p>
  
  <pre><code>ActiveSheet.Range("$A$1:$BG$5158").AutoFilter Field:=13, Criteria1:= _ 
  "&gt;"Range("BJ1").Value, Operator:=xlAnd
  </code></pre>
  
  <p>Here is the complete code</p>
  
  <pre><code>Sheets("New Hire").Select 
  Range("CI1").Select 
  Selection.Copy 
  
  ChDir "D:\Sales Report" 
  Workbooks.Open Filename:="D:\Sales Report\Global_New_Hire_Report.xlsb" 
  Windows("Global_New_Hire_Report.xlsb").Activate 
  
  Range("BJ1").Select 
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ 
  :=False, Transpose:=False 
  
  Range("A1").Select 
  Selection.AutoFilter 
  
  Windows("Global_New_Hire_Report.xlsb").Activate 
  ActiveSheet.Range("$A$1:$BG$5158").AutoFilter Field:=13, Criteria1:= _ 
  "&gt;"Range("BJ1").Value, Operator:=xlAnd
  </code></pre>