title: Sort and remove duplicates VBA
body: <p>I want to move values from range <code>S1:S6</code> to range <code>T1</code> remove duplicates and sort them from high to low.</p>
  
  <p>Im already able to filter the data and move it to the desired range but i cant figure out how to sort it on the destination range.</p>
  
  <p>Heres what im using to move and filter the data:</p>
  
  <pre><code>Range("S1:S6").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("T1"), Unique:=True
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/qM5Jp.jpg" rel="nofollow noreferrer">Filter Result</a></p>
  
  <p>What can i had to this line to sort the data?</p>
  
  <p>Thanks for your time,</p>
  
  <p><em>Jonhdoe</em></p>