title: How to find a value in an excel column by vba code Cells.Find
body: <p>I have to find a value <strong>celda</strong> in an Excel sheet. I was using this vba code to find it:</p>
  
  <pre><code>Set cell = Cells.Find(What:=celda, After:=ActiveCell, LookIn:= _
      xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:= _
      xlNext, MatchCase:=False, SearchFormat:=False)
  
  
  If cell Is Nothing Then
      'do it something
  
  Else
      'do it another thing
  End If
  </code></pre>
  
  <p>The problem is when I have to find the value <strong>only in a excel column</strong>. I find it with next code:</p>
  
  <pre><code>    Columns("B:B").Select
      Selection.Find(What:="VA22GU1", After:=ActiveCell, LookIn:=xlFormulas, _
          LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
          MatchCase:=False, SearchFormat:=False).Activate
  </code></pre>
  
  <p>But I don't know how to adapt it to the first vba code, because I have to use the value <code>nothing</code>.</p>