Inhalt einer Zelle Vergleichen mit zich Zellen

[silverwing77]

Hallo Zusammen,

ich arbeite neu mit dem Office packet und steche vor einem Problem. Versucht hab ch es schon mit "VERGLEICH" und "SUMME" aber irgendwie klappt es nicht.

Folgende Situation:
In Zelle AR1:DM1 Stehen die Begriffe als Text, in der Zelle W2 Vorkommen können. Kommen diese Vor, sollen die Begriffe mittels § Trennzeichen aufgelistet werden.
Steht einer der Begriffe aus AR1:DM1 nicht in W2, dann soll einfach keine Auflistung erfolgen.

Beispiel W2 = Elegante Damen Sonnenbrille high society Sunglasses
Beispiel AR1:DM1 = Herren Damen Kinder Fashion Accessoires Gr Handtasche Sonnenbrille Uhr Gürtel Schmuck usw (hierbei getrennt durch leerzeichen)

Richtige Ausgabe wäre: Damen§Sonnenbrille

Irgendwie klappt es nicht, es kommt mir vor als wäre der Berreich AR1:DM1 zu gross.

Vorab Danke für die Hilfe
Gruss

Jenni

[silverwing77]

Also bin soweit weiter das mann in eine Zelle dann schonmal eine 0 zugeordnet wird. Über die Wenn Funktion kann ich dann denn einen Begriff zuordnen.
Geht das nicht über eine kombinierte Funktion?

LG Jenni

[mikele]

Hallo,

meines Wissens klappt das ohne Makro nicht, da es keine Verkettungsfunktion mit Bereich als Argument gibt.
Mit folgendem Makro sollte es funktionieren:

Code: Alles auswählen

Function textfilter (original as string, quelle) as string

textfilter=""
Dim i as Integer
Dim j as Integer
for i=1 to UBound(quelle,1)
for j=1 to UBound(quelle,2)
	if instr(original,quelle(i,j))>0 then
		if textfilter<>"" then textfilter=textfilter+"§"
		textfilter=textfilter+quelle(i,j)
	end if		
next j
next i

End Function

Aufgerufen (nach deinen Infos)

Code: Alles auswählen

=textfilter(W2;AR1:DM1)