Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Anfangsbuchstaben pro Zeile

Forumthread: Anfangsbuchstaben pro Zeile

Anfangsbuchstaben pro Zeile
04.01.2018 17:28:40
Rahel
Hallo liebes Forum,
ich habe ein vermutlich recht simpel zu lösendes Problem:
Ich möchte in den Zellen des beigefügten Excel Sheets in Spalte B die verschiedenen vorkommenden Anfangsbuchstaben isolieren. Allerdings nicht einfach alle Anfangsbuchstaben, sondern jeden vorkommenden nur einmal.
Aus Zelle B1 soll also in Zelle C1 "G" und "H" übertragen werden - jeweils einmal, nicht 7 mal "H" und 10 mal "G".
Vielen Dank für eure Hilfe !!!
Grüße
Rahel
https://www.herber.de/bbs/user/118678.xlsx
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba
04.01.2018 17:42:13
Fennek
Hallo,
es ist immer wieder schön, Daimler zu unterstützen.

Sub Main
dim B as string
for i = 2 to cells(rows.count, 2).end(xlup).row
Tx = split(cells(i,2), chr(10))
B = ""
for k = 0 to  ubound(Tx)
if instr(1, B, left(Tx(k),1)) = 0 then B = B & ", " & left(Tx(k),1)
next k
cells(i,3) = mid(B,3)
next i
End Sub
mfg
Anzeige
AW: vba
04.01.2018 18:07:27
Rahel
Funktioniert bestens!
Herzlichen Dank
Rahel
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige