Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: suchen und auswerten

suchen und auswerten
27.02.2007 18:05:36
Christian
Hallo Excelprofis,
wieder einmal habe ich ein "kleines" Problem, da meine VBa-Kenntnisse sehr beschränkt sind.
Ich habe in sder Spalte A Nummern stehen und in Spalte B, C und D Namen.
Nun will ich das eine Schleife durchlaufen wird die mir den Namen aus Spalte F einliesst und schaut ob der Name in Spalte B C oder D vorkommt und wenn ja wo überall (sprich in welcher Zeile und mit der dazugehörigen Nr) und es z.B in einer Msgbox ausgeben.
z.B. rainer als Name 1 mit Nr 22
rainer als Name 2 mit Nr 22
rainer als Name 2 mit Nr 545
Zur Verdeutlichung hab ich euch eine kleine Bespieltabelle hochgeladen.

Die Datei https://www.herber.de/bbs/user/40733.xls wurde aus Datenschutzgründen gelöscht


ich hoffe mir kann jemand weiterhelfen, da ich ans Ende meiner minimalen VBA-Kenntnisse gestoßen bin.
Schon einmal Vielen Dank im voraus für die Bemühungen, ich hoffe ich höre von euch ....
Danke
Christian
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: suchen und auswerten
28.02.2007 20:31:08
worti
Hallo Christian,
meinst du sowas:

Sub NummernUndNamen()
Dim c As Range, c1 As Range
Dim Suchbereich As Range
Dim ersterFund As String
Set Suchbereich = Range("B2:D7")
For Each c In Range("F2:F8")
Set c1 = Suchbereich.Find(c)
If Not c1 Is Nothing Then
ersterFund = c1.Address
Do
MsgBox "Name " & c & " gefunden mit Nummer " & Range("A" & c1.Row)
Set c1 = Suchbereich.FindNext(c1)
Loop Until c1 Is Nothing Or c1.Address = ersterFund
End If
Next c
End Sub

Anzeige
AW: suchen und auswerten
28.02.2007 21:26:36
Luschi
Hallo Christian,
habe mal Dein Problem mit Vba gelöst.
Das Ergebnis findest Du hier: https://www.herber.de/bbs/user/40765.xls
Ha be im Quellcode auch 1 paar Kommentare reingeschrieben.
Gruß von Luschi
aus klein-Paris
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige