VBA für Text aggregieren und verketten
13.02.2019 16:31:15
AnBad
1) Feststellen von Textwiederholungen (Textlänge mehr als 255 Zeichen) in z.B. Spalte C,D,F, Zeilen z.B. 20 bis 1500 (Also im Script oder über Zellbezug festzulegender Bereich).
2) Einmalige Ausgabe eines jeden Textes in einer Zelle (also ohne Wiederholungen) mit z.B.: =Textausgabe(1); = Textausgabe(2), .... Textausgabe(Zeile())
3) Zu =Textausgabe(1) sollen mit z.B. =Position(1) die Zellenwerte der Spalte A mit Übereinstimmung von Textausgabe(1) verknüpft aufgeführt werden.
Also:
Spalte A......//..Spalte C....//..Spalte D....//..Spalte F
Pos. 1........//..Text 1......//..Text 2
Pos. 2........//..Text 3......//..Text 1
Pos. 3........//..Text 4......//..............//..Text 1
Ergebnis:
Spalte A.......................//..Spalte C
(Texte, welche vorkommen:).....(und sind unter den Positionen zu finden:)
Text 1.........................//..Pos 1, Pos 2, Pos 3
Text 2.........................//..Pos 1
Text 3.........................//..Pos 2
Text 4.........................//..Pos 3
Dies würde schon mal sehr helfen. Wirklich Top wäre es, wenn man das Script filtern könnte:
1) Ausschluss: Wenn ein Text mit z.B. "Sabine:" oder "Jochen:" anfängt, diese zwei ausschließen.
2) Filtern: Wenn ein Text mit z.B. "Sabine:" anfängt, nur diese Text auswerten.
Vielen Dank!!