title: How to select the identified cell by using range in VBA
body: <pre><code>Dim coname, WHAT_TO_FIND As String
      Dim i As Integer
      totalRow = Application.CountA(Range("c:c")) - 1
      i = 2
      While i &lt;= totalRow
      coname = Sheet20.Cells(i, "A") 
      i = i + 1
      WHAT_TO_FIND = coname
      sheets("Sheet21").Select 
      Set ws = ActiveSheet
      Set FoundCell = ws.Range("D:D").Find(what:=WHAT_TO_FIND, lookat:=xlWhole)
  
      wend
  
  // in sheet20 I have limited number of comapny names list
  // in sheet21 I have the data with n number of company names
  </code></pre>
  
  <p>Please let me know how to select that particular cell which is found in sheet21.</p>