title: Find duplicate words with in a cell and paste to next column
body: <p>I am new to excel VBA. I have around 20k rows filled with descriptions in column A. The words are delimited with spaces. I need to find <code>repeated words</code> (not letters) available in column A and paste them in column B as depicted below.</p>
  
  <pre><code>+---------------------------------------------+-----------+
  |                   A                         |     B     |
  +---------------------------------------------+-----------+
  | STEEL ROD BALL BEARING STEEL ROD            | STEEL ROD |
  +---------------------------------------------+-----------+
  | I LIKE MICROSOFT EXCEL AND MICROSOFT ACCESS | MICROSOFT |
  +---------------------------------------------+-----------+
  </code></pre>
  
  <p>I searched over the internet and I could not find as required. <a href="http://www.excelforum.com/excel-general/747606-trying-to-remove-duplicate-text-within-a-cell.html" rel="nofollow">This link</a> helped me to remove duplicates. I don't want to remove them but copy to the next column.</p>