Einen bestimmten Wert finden (Tipp_68) -
27.07.2008Wenn Sie einen großen Tabellenbereich mit Zahlenwerten haben, ist es schwierig, einen bestimmten Zahlenwert zu finden. Wenn Sie z. B. die Zelle finden möchten, in der die Zahl 5 steht, dann würde Ihnen mit dem Suchbefehl z. B. auch die Zelle mit der Zahl 125 angezeigt werden. Das folgende kleine VBA-Programm zeigt, wie man dieses Problem über ein Makro lösen kann:
Sub zahl_suchen()
leere_Zeile = Range("A" & Rows.Count).End(xlUp).Row + 1
For i = 1 To leere_Zeile
Range("A" & i).Select
If ActiveCell = 5 Then Exit Sub
Next i
End Sub
In diesem Beispiel wird die Spalte A durchsucht, bis zur ersten leeren Zelle.
Das gleiche Ergebnis erhalten Sie auch, wenn man im Menü Bearbeiten / Suchen einen Haken vor Nur ganzen Zellen suchen
setzt.
