Ich muss einen Wert findenCelda in einer Excel-Tabelle. Ich habe diesen VBA-Code verwendet, um ihn zu finden:

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

Das Problem ist, wenn ich den Wert finden mussnur in einer Excel-Spalte. Ich finde es mit dem nächsten Code:

    Columns("B:B").Select
    Selection.Find(What:="VA22GU1", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate

Aber ich weiß nicht, wie ich es an den ersten vba-Code anpassen soll, weil ich den Wert verwenden mussnothing.