title: Use the Find function in VBA to find the first value above the active cell?
body: <p>I am trying to get the row number of the result of a find function, I am using the following.</p>
  
  <pre><code>Set FindRow = ThisWorkbook.Sheets("Schedule").Range(ActiveCell.Address &amp; ":n" &amp; Sheets("Schedule").Cells(ActiveSheet.Rows.Count, 1).End(XlUP).Row).Find(What:="Assembly", SearchDirection:=xlPrevious, MatchCase:=False)
  
  Msgbox (FindRow.Row)
  </code></pre>
  
  <p>This works fine but returns the last cell in the range that has the value in it. 
  If I alter the Search Direction to XlNext, this returns the next cell below with the value in it. 
  I would like it to search above the active cell for the next value.</p>