vlookup vom range mit loop
#1
Hallo Zusammen, 

möchte um eure Hilfe bitten:

geht es ohne macro eine Art von loop mit dem sverweis zu erstellen?

es gibt 

-eine Namensliste mit Nachnamen

-eine Spalte Freitext, wo der Freitext ab-und-zu einen Nachnamen aus der NamensListe beinhaltet

Habe es versucht mit geschachtelten IF(SEARCH(B6,D6,1)>0,B6,"") Formeln zu machen um pro Freitextzeile die gesamte Namensliste durchzuchecken, aber geklappt hat es leider nicht...


Danke & beste Grüße
Lilla


Angehängte Dateien
.xlsx   Beispiel für range search lookup.xlsx (Größe: 11,97 KB / Downloads: 11)
Top
#2
Hallo,

mit VBA wäre das kein Problem. Darf es so etwas sein?

Hallo,

hier das Makro. Die Bezüge musst du noch anpassen.


Code:
Sub suche()
Dim intZeile As Integer
Dim zelle As Range
Dim ersteAdresse As String
For intZeile = 6 To 13
   With Tabelle1.Range("D6:D13")
       Set zelle = .Find(Cells(intZeile, 2), LookIn:=xlValues, lookat:=xlPart)
           If Not zelle Is Nothing Then
                   ersteAdresse = zelle.Address
               Do
                   Cells(zelle.Row, 6) = Cells(intZeile, 2).Text
               Set zelle = .FindNext(zelle)
               Loop While Not zelle Is Nothing And zelle.Address <> ersteAdresse
           End If
   End With
Next intZeile
End Sub
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Top
#3
Hi Lilla,

"geklaut" von Steve1da:

Arbeitsblatt mit dem Namen 'Sheet1'
BCDEFGH
5NamenlisteFreiTextLookUp
6SchmidtA. Farin, Flug nach Zurich, 9.9.1999<--FarinFarin
7MuellerA. Mueller, Zug, Zurich, 9.9.1999<--MuellerMueller
8FarinHotel, Farin Urlaub, 1.10.2020<--FarinFarin
9BelaHotel, Bela B, 1.10.2020<--BelaBela
10RodrigoZug, Rodrigo, 1.10.2020<--RodrigoRodrigo
11GonzalezCampino C., Zug, Bern, 1.10.2020<--CampinoCampino
12CampinoHolst, Zug, Bern, 1.10.2020<--HolstHolst
13HolstB. Schmidt, Flug Malediven, 5.5.2015<--SchmidtSchmidt

ZelleFormel
H6=VERWEIS(2;1/(ISTZAHL(SUCHEN($B$6:$B$13;D6)));$B$6:$B$13)
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016
Diese Tabelle wurde mit Tab2Html (v2.6.2) erstellt. ©Gerd alias Bamberg
Top
#4
Hallo, ebenfalls von steve1da "geborgt" ...:

PHP-Code:
=VERWEIS(42;1/SUCHEN($B$6:$B$13;D6);$B$6:$B$13
Gruß Jörg
stolzes Mitglied im ----Excel-Verein

Im Wort FEHLER steckt auch das Wort HELFER!

FEHLER helfen dir.
Nimm deine FEHLER an und lerne aus ihnen. 
Wenn du es zulässt, dann werden sie dich stärken

Im Wort 
Top
#5
Lightbulb 
Danke für Eure Hilfe, es klappt super! :)
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste