Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1804to1808
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
1804to1808
1804to1808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Übereinstimmende Zeichen zählen

Übereinstimmende Zeichen zählen
14.01.2021 16:04:44
excelliebe
Hallo zusammen,
heute möchte ich in einen Wert mit den Werten aus einer Spalte abgleichen und mir die Werte mit der größten Übereinstimmung zurückgeben lassen.
Beispiel für gesuchten Wert: WC201 oder WKC (Anzahl Zeichen varriert)
Nun möchte ich, dass Excel jedes einzelne Zeichen mit den Werten in dieser Spalte abgleicht:
WKC201
WKC141 cushion
6005 MD
WKC17
8503
10606
9297
9279
8159
11200
9715
WKC85
5383
5383 S/2
GM-LBR-1501
Die, die die größte Übereinstimmung hat (haben), sollen zurückgegeben werden.
D.h. im Falle von WC201 der Wert WKC201
und im Falle von WKC die Werte WKC85, WKC201, WKC141 cushion und WKC17.
Ist das irgendwie möglich?
LG und Danke

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Beispiel für WC201
14.01.2021 16:21:48
Fennek
Hallo,
Liste in Spalte A:

Sub Main
key = "WC201"
for i = 1 to 15
Tx = cells(i,1)
for b = 1 to len(key)
if instr(1, Tx, mid(key, b, 1)) > 0 then t = t + 1
next b
cells(i,2) = t
t = 0
next i
End Sub
Die Erweiterung für viele Begriffe ("key") sollte kein Problem sein.
mfg
AW: Beispiel für WC201
14.01.2021 16:43:55
excelliebe
Hallo,
vielen Dank für die schnelle Rückmeldung. Ich hatte eig. an eine Formel gedacht - ohne VBA.
Geht aber auch so, danke! Allerdings bräuchte ich dann noch etwas Hilfe.
Die Spalte, in der ich suche, ist im Tabellenblatt SKU Spalte F und der Wert, den ich suche, steht im Blatt Filter Zelle E2.
Die ausgegebenen Werte möchte ich im Blatt Filter in Spalte N ab Zeile 5 untereinander (wenn möglich).
Könntest du mir hier noch einmal helfen?
LG
Anzeige
AW: Beispiel für WC201
14.01.2021 17:18:53
Fennek 

Sub Main
key = sheets("Filter").range("E2") ' "WC201"
with sheets("SKU")
for i = 1 to .cells(rows.count, 6).end(xlup).row
Tx = .cells(i,6)
for b = 1 to len(key)
if instr(1, Tx, mid(key, b, 1)) > 0 then t = t + 1
next b
.cells(i,7) = t
t = 0
next i
mx = worksheetfunction.max(.columns(7)
lr = worksheetfunction.match(mx, .columns(7), 0)
sheets("Filter").cells(5, 14) = .cells(lr, 6).value
end with
End Sub

AW: Beispiel für WC201
14.01.2021 17:31:34
excelliebe
Danke, das funktioniert schonmal :)
Allerdings erhalte ich immer nur ein Ergebnis. Ich hätte gerne mehrere Werte zurück.
z.B. bei
5383
5383 S/2
Wenn ich nach 5383 oder 538 suche, erscheint nur 5383.Ich hätte gerne beide Werte zurück.
Geht das?
LG und vielen Dank!
Anzeige
AW: Übereinstimmende Zeichen zählen
14.01.2021 17:47:17
Daniel
HI
ohne VBA:
schreibe den kurzen Text in eine Zelle, z.B. D1
schreibe diese Formel neben die Daten (Formel ist für B1): 
=SUMMENPRODUKT(--ISTZAHL(SUCHEN(TEIL($D$1;ZEILE(BEREICH.VERSCHIEBEN($Z$1;0;0;LÄNGE($D$1);1));1);A1)))

filtere dann mit dem Autofilter nach dem höchsten Wert.
sollte Groß/Kleinschreibung eine Rolle spielen, dann ersetze Suchen durch Finden.
die Anzahl, wie oft ein Buchstabe vorkommt, spielt keine Rolle.
Gruß Daniel
AW: Übereinstimmende Zeichen zählen
15.01.2021 10:01:00
excelliebe
Hi Daniel!
Vielen Dank - auf eine solche Lösung für mein Problem habe ich gar nicht gedacht.
Kannst du mir bei Gelegenheit Schritt für Schritt erklären, was genau hier passiert? Rein aus Interesse :)
LG
Anzeige
AW: Übereinstimmende Zeichen zählen
15.01.2021 10:33:44
Daniel
HI
naja, es wird in einer Schleife geprüft, ob jedes Zeichen aus D1 in A1 vorhanden ist.
Suchen erzeugt eine Zahl oder einen Fehler, je nachdem ob das Zeichen drin ist oder nicht.
IstZahl macht daraus WAHR und FALSCH
-- macht aus WAHR und FALSCH 1 und 0
die Ergebnisse aus der Schleife werden dann vom Summenprodukt aufsummiert.
Eine Schleife erzeugt man dadurch, dass man an einer Stelle, an welcher ein Einzelwert erwartet wird, einen Zellbezug auf mehrere Zellen einstellt (oder eine Matrixkonstante {…} )
Excel erzeugt dann die Schleife (Matrixformel).
das Bereich.Verschieben ist dann hier notwendig, um diesen Zellbereich an die Länge des Textes anzupassen.
bei einem fixen Text könnte die Formel so aussehen, ist vielleicht etwas sprechender:
=SUMMENPRODUKT(--ISTZAHL(SUCHEN(TEIL("abc";{1;2;3};1);A1)))
Gruß Daniel
Anzeige
AW: Übereinstimmende Zeichen zählen
15.01.2021 10:39:22
excelliebe
Mega - vielen Dank für die ausführliche Erklärung :)

300 Forumthreads zu ähnlichen Themen

Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Anzeige
Unicode-Zeichen in Textfeld von Userform
Userform

Hallo,
Ich bin auf der Suche nach gut praktikablen Möglichkeiten in ein Textfeld eines Userforms Unicode-Zeichen (z.B. ć kleines c mit Akut - Code 0107 oder č kleines c mit Caron - Code 010D) einzutippen.
Danke im voraus für alle Tipps!
Grüße
Günther
12.10.2008 12:34:00
Thread-ID: 1015836
5 Beiträge
Zeichen in String einfügen
Dieterlem

Hallo Excelfreunde,
ich möchte mit einer Formel Zeichen in einen String einfügen. Der String soll wie folgt umgewandelt werden:
121245f12345 = 121245-F-12345
Es soll also vor und hinter dem Buchstaben ein Bindestrich eingefügt werden. Der Buchstabe soll in ein Großbuchstaben gewande...
12.12.2008 15:08:00
Thread-ID: 1032419
14 Beiträge
Anzeige
Anzahl der Zeichen in einer Zelle
Jan

Guten Morgen
Welcher Befehl zählt die Zeichen in einer Zelle?
Danke
Gruß Jan
07.01.2009 08:38:00
Thread-ID: 1037436
3 Beiträge
Nur bestimmte Zeichen in Zelle
wolle

Erstmal ein Hallo an Alle und alles gute in 2009!
Ich hätte folgende Frage:
Wie kann ich es machen, dass in Spalte B von Zelle B10 bis Zelle Bxx nur die Zeichen "J" "j" "N" "n" eingeben werden können und bei Eingabe eines anderen Zeichens ein kleines Popup erscheint, das den Bediener in...
09.01.2009 11:22:25
Thread-ID: 1038162
3 Beiträge
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Tausenderzeichen in Textbox
Stefen

Hi Leute
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox1=Format(TextBox1,"#,##0.00") End Sub
eingebe sollte doch in Verbindung mit Controlsource in der TextBox die Tausenderzeichen stehen.
Warum geht das nicht.
Es zeigt mir immer nur den Betrag 50000...
31.01.2009 16:44:00
Thread-ID: 1045681
12 Beiträge
Anzeige

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
2
3
4
13
4
2
2
5
2
11
4
4
4
5
11
1
2
2
14
8
4
2
12
2
7