title: Runtime Error '424' Object Required
body: <p>I have a range of data in cells <code>BA8</code> through and including <code>BN10</code> in worksheet <code>"HR Eval Report"</code> in the active workbook.</p>
  
  <p>I want to <strong>sort this range</strong> in ascending order based upon the values in cells <code>BC8:BC10</code>. Here is the part of my code causing problems:</p>
  
  <pre><code>Dim rngOutData As Range
  ...
  ActiveWorkbook.Worksheets("HR Eval Report").Range("BA8").Select
  Set rngOutData = ActiveWorkbook.Worksheets("HR Eval Report").Range(Selection, _
  Selection.End(xlToRight)).Select
  </code></pre>
  
  <p>The <code>Set rngOutData</code> statement throws the error. I have tried fully qualifying the range as similar <code>424</code> problem answers indicated that as a solution, but it didn't solve the problem. Any advice greatly appreciated.</p>