Herbers Excel-Forum - das Archiv

suchen in nSpalten

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: suchen in nSpalten
von: smart8900

Geschrieben am: 19.04.2005 13:20:09
Hallo Spezies !
Habe hier eine Suche Option ... wie kann ich die ändern, damit nur in Spalte A gesucht wird ??? Spalte A wichtig, da gleiche Zahlen auch in anderen Spalten vorkommen.
Habe selber ein wenig experimentiert, aber meine Kenntnisse reichen nicht aus ... bekomme nur Fehlermeldungen !

Sub Suchen()
Dim Eingabe As String
Dim Feld As Range
Dim Gefunden As Boolean
Dim Antwort As Long
[A1].Select
Eingabe = Application.InputBox("Paketnummer in Tabelle?", "Suche", "7551")
If Eingabe <> "" Then
For Each Feld In ActiveSheet.UsedRange
If InStr(UCase(CStr(Feld.Value)), UCase(Eingabe)) > 0 Then
Gefunden = True
Feld.Select
Antwort = MsgBox("Weitersuchen?", vbQuestion + vbYesNo)
If Antwort = vbNo Then
Exit For
End If
End If
Next Feld
If Gefunden = False Then
MsgBox "'" & Eingabe & "' nicht gefunden!", vbInformation
End If
End If
End Sub

Für Hilfe danke ich schon jetzt !
Bild

Betrifft: AW: suchen in nSpalten
von: Dr.
Geschrieben am: 19.04.2005 14:15:10
Das sollte es tun:
For Each Feld In ActiveSheet.Range("A:A")
Bild

Betrifft: AW: suchen in nSpalten
von: Holger
Geschrieben am: 19.04.2005 14:30:12
For Each Feld In ActiveSheet.UsedRange.Columns(1)
mfg Holger
Bild

Betrifft: AW: suchen in nSpalten
von: smart8900
Geschrieben am: 19.04.2005 20:01:42
Hallo Ihr zwei ...
Danke für die schnelle Hilfe ... funktioniert natürlich einwandfrei :)
An ("A:A") hatte ich auch gedacht, aber die "Rechtschreibung" vernachlässigt ...
Tausend Danke ...
 Bild
Excel-Beispiele zum Thema "suchen in nSpalten"
Zellinhalt suchen und Zelle auswählen Suchbegriff über mehrere Tabellenblätter suchen.
Suchen und weitersuchen Zahl +/- 1 suchen
Ein Zeichen in einer Formel suchen Datum suchen und Wert eintragen
Wert in Tabelle suchen und in UserForm ausgeben Letzte Zelle mit Inhalt suchen
Textdatei nach Begriff durchsuchen und Fundzeile importieren Wert in Array suchen, ohne jedes Datenfeld abzufragen