Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1724to1728
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Straßenname aus Liste finden und alternativen anzeigen

Straßenname aus Liste finden und alternativen anzeigen
01.12.2019 21:52:03
Sonja
Guten Abend
Ich habe folgende Situation
Wenn man in dem Grünen Feld beginnt den Strassennamen einzugeben wird der passenden gefunden.
Aber das funktioniert nur von Beginn an.
Wenn ich Bach eingebe wird Bachstraße angezeigt.
Es soll aber so sein das alle passende Alternativen angezeigt werden und man dann die Auswahl hat.
In dem Fall soll bei der Eingabe von "Bach" die "Bachstraße" und die "Alte Bachstraße" zur Auswahl stehen.
Oder bei "Müller" soll "Hubert-Müller-Weg" und "Oscar-Müller-Straße" zur Auswahl stehen.
Der Ausgewählte Straßenname soll dann in die Zelle "Strasse_Eingabe" eingetragen werden
Kann mir jemand dabei helfen?
Hier die Demo Datei
https://www.herber.de/bbs/user/133522.zip
Liebe Grüße Sonja

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Trefferliste
01.12.2019 23:01:27
WF
Hi,
mit Deiner Demo-Datei kann man nichts anfangen.
Angenommen, in Spalte A von A1 bis A? stehen jede Menge Straßennamen.
In C1 steht Dein Suchbegriff.
In C2 dann folgende Arrayformel:
{=WENNFEHLER(INDEX(A:A;KKLEINSTE(WENN(ISTZAHL(SUCHEN(C$1;A$1:A$999));ZEILE(X$1:X$99));ZEILE(X1)));"") }
runterkopieren
Es werden alle Straßen aufgelistet, in denen der Suchbegriff irgendwo vorkommt.
WF
AW: Trefferliste
01.12.2019 23:13:00
Sonja
Beide Dateien müssen im Ordner
D:/Auftrag/
liegen .. dann funktioniert die Demo Datei
AW: Trefferliste
05.12.2019 11:57:42
Piet
Hallo
ich habe nicht die ursprüngliche Lösung per Text Datei, aber dafür ein die funktioniert.
Voraussetzung ist, die Strassen stehen alle in der Tabelle "Strassen", in der gleichen Mappe.
Dann reicht ein simpler Suchlauf aus, um alle Varianten zu finden. Ich hoffe es gefaellt ....
https://www.herber.de/bbs/user/133617.xls
mfg Piet
Anzeige
AW: Trefferliste
05.12.2019 16:55:21
Hajo_Zi
Hallo Piet,
lasse den Fragesteller entscheiden ob offen.
Es ist heute nicht mehr üblich eine Rückmeldung zu geben und so ist der Beitrag über 6 Tage offen.
Das ist nur meine Meinung zu dem Thema.

Eingabe in ComboBox und nach Enter neu Füllen
05.12.2019 20:06:13
Sonja
Hallo Piet,
vielen Dank für deine Hilfe.
Es muss keine Text Datei es. So war es nur bissher.
So funktioniert es ganz gut. Ist es möglich dass man in die ComboBox den Teil des Strassennamens eingibt und wenn man Enter drückt wird die Combobox mit den Treffern gefüllt.
Liebe Grüße Sonja
@ Hajo_Zi ... auf was hätte ich eine Rückmeldung geben sollen? Es hat ja keiner was geschrieben !!
Anzeige
AW: Eingabe in ComboBox und nach Enter neu Füllen
06.12.2019 21:07:00
Piet
Hallo Sonja
ich habe mehrfach versucht es direkt über die ComboBox zu programmieren, klappt leider nicht. Ich finde keinen Zugriff auf das Eingabefeld! Man kann nur die Werte aus der Boxliste auslesen. Alternativ kann man die gefundenen Strassen auch eine Zeile unter B10 auflisten, und ganz auf die ComboBox verzichten.
mfg Piet

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rFind As Range, Adr1 As String
Dim SuName As String, z As Integer
If Target.Count > 1 Then Exit Sub
If Target.Value = "" Then Exit Sub
If Target.Address  "$B$10" Then Exit Sub
With Worksheets("Strassen")
On Error GoTo Fin
SuName = LCase(Target)   'Kleinschrift suchen
z = Worksheets(1).Cells(1000, 2).End(xlUp).Row + 1
Worksheets(1).Range("B11:B" & z).ClearContents
Set rFind = .Columns(1).Find(What:=SuName, After:=.Range("A1"), LookIn:= _
xlFormulas, LookAt:=xlPart, SearchDirection:=xlNext, MatchCase:=False)
If rFind Is Nothing Then MsgBox Target & "  -  keine Strasse gefunden!": Exit Sub
If Not rFind Is Nothing Then
Adr1 = rFind.Address: z = 0
Do
z = z + 1
Worksheets(1).Range("B10").Offset(z, 0) = rFind.Value
Set rFind = .Columns(1).FindNext(rFind)
Loop Until rFind.Address = Adr1
End If
Fin: Target.Select
End With
End Sub

Anzeige

301 Forumthreads zu ähnlichen Themen

Nicht nur Namen aus Adressliste eintragen
Fred


Hallo zusammen
Ich benutze unten stehenden Code um aus Globalen Adressliste alle namen in meine Tabelle eintragen zu lassen. Hat jemand ne AHNUNG wie ich auch die Dazu gehörenden Daten wie E_Mailadresse , Telephonnummer, Straße usw. mit eintragen lassen kann
Ich hoffe mir kann je...
14.11.2008 17:39:00
Thread-ID: 1024670
4 Beiträge
Anzeige
Namen aus Liste auswählen
Volker

Hallo liebe Excelgemeinde.
Wie nennt man es eigendlich, wenn man z. B. im Bereich a5 bis a25 Namen stehen hat und wenn man im Bereich d30 bis d 55 dann bein Eintagen diese o.g. Namen sozusagen "vorgeschlagen" werden. Wenn man z.b. eine " E" eingibt, sollen alle Namen mit "E" als Anfangsbuch...
02.12.2009 18:55:16
Thread-ID: 1121470
3 Beiträge
Name aus einer Liste auswählen
Willi

Hallo Leute,
ich habe ein Problem wie folgt:
aus einer Spalte in der stehen die Lieferanten untereinander. Es gibt
sehr viele doppelte Eintragungen. Mein wunsch ist folgender:
in einem anderen Blatt möchte ich die Umsätze der Lieferanten zusammenfassen.
Dazu will ich in eine...
09.02.2011 12:56:50
Thread-ID: 1199853
5 Beiträge
Anzeige
Die Tabellennamen aus einer Liste erstellen
chandler

Hallo Profis,
suche nach einer Möglichkeit die Tabellennamen aus Tabelle1 der Spalte A2, nach unten variabel, umbenenen. Dabei sollte aus der Spalte B der Wert in die jewalige Tabelle in die Zelle A1 eingetragen werden.
Bitte um Hilfe. Vielen Dank
chandler
02.08.2012 14:18:21
Thread-ID: 1273510
5 Beiträge
Anzahl eindeutiger Namen aus Liste
Thomas

Hallo,
ich habde das Problem, dass ich eine Liste mit Kundennummern habe in denen bestimme Nummern öfters erscheinen.
Ich möchte nun die Anzahl der Kunden kennen die in dieser Liste vorkommt.
Ich weiß, dass es über Dublikate entfernen und auch Formeln die Möglichkeit gibt diese Info...
30.07.2013 16:56:20
Thread-ID: 1324923
7 Beiträge
in Zelle: Dropdownliste aus selektiven Dateinamen
Peter

Guten Tag
Ich habe in einem betimmten Pfad, sagen wir C:\TEST\ verschiedene Dateien (Excel und andere).
Kann ich in einem Excel-File, Tabelle1, für Zelle A5 eine Dropdownliste abfüllen, in der jede Datei aus C:\TEST\ enthalten ist, sofern im Dateinamen TestX vorkommt? Ideal wäre, wenn d...
13.08.2013 16:57:11
Thread-ID: 1326742
3 Beiträge
Filenamen aus Liste in Verzeichnis erkennen
ChrisW

Hallo Leute,
Ich habe in einem Verzeichnis "I:\ZIPs" 1700 Files
Ich habe in einer Excel Liste 900 Dateinamen untereinander in Spalte A.
Jetzt suche ich nach einer Möglichkeit in Spalte B eintragen zu lassen, ob der Filename aus Spalte A im Verzeichnis "I:\ZIPs" abgelegt ist oder nic...
14.05.2014 12:25:32
Thread-ID: 1361533
3 Beiträge
Tabellenblattname aus Listenfeld als Variable
Kurt

Hallo Experten!
Ich habe einen VBA-Code der folgendes enthält:
Dim Data As Worksheet
Dim ChartP As Worksheet
Set Data = Worksheets("Daten")
Set ChartP = Worksheets("Chart")
....
Mit diesen Variablen funktioniert alles bestens.
Ich möchte jetzt aber statt "Chart"...
13.12.2014 13:30:56
Thread-ID: 1397750
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
1
2
4
4
4
6
2
2
2
7
3
12
7
1
5
3
4
6
7
7
4
1
8
7