Auch noch ein Tipp dazu.
Mir ist aufgefallen das die Formel von Manuel nicht funzt falls in der Domainliste auch mal eine nicht Third Level Domain vorkommt.
(Und da es ja nun auch DomainEndungen gibt die (SchauerlicherWeise) etwas länger sind wie die max 5 Zeichen die in der Formel verwendet werden gehe ich mal mit max 99 Zeichen ran, mal schauen für wie lange das ausreicht).
Annahme: Domain in Zelle A1, Formel dahinter in Zelle B1
Formel Aufbau "Erklärung":
TESTNAME.co.uk TESTNAME "=LINKS(A1;FINDEN(".";A1)-1)
So sieht also der Domainnamen aus
TESTNAME.co.uk .co.uk "=TEIL(A1;FINDEN(".";A1);99)
mit diesem wissen kann ich nun die Formel erweitern
TESTNAME.co.uk co.uk "=TEIL(A1;FINDEN(".";A1)+1;99)
1 Zeichen weniger da der User es ja ohne den ersten Dot mag
TESTNAME.co.uk .uk "=TEIL(TEIL(A1;FINDEN(".";A1)+1;99);FINDEN(".";TEIL(A1;FINDEN(".";A1)+1;99));99)
Aha, nun haben wir die Zweite Endung (Third Level (Das Erste Level ist der Namensanteil in der Domain))
=GLÄTTEN(TEIL(TEIL(A1;FINDEN(".";A1)+1;99);FINDEN(".";TEIL(A1;FINDEN(".";A1);99));99))
Wieder mal ein Zeichen weniger, da der User …
FERTIG: (Nö!)
TESTNAME.co.uk uk
"=GLÄTTEN(TEIL(TEIL(A1;FINDEN(".";A1)+1;99);FINDEN(".";TEIL(A1;FINDEN(".";A1)+1;99))+1;99))
(Leerzeichen im Wort FINDEN,oder Allgemein in den Formeln bitte raus machen)
Falls jemand so witzig war nach der Domain noch ein Leerzeichen zu schreiben, haben wir lieber mal alles geglättet (GLÄTTEN = Vordere und Hintere Leerzeichen entfernen).
Ups, ich Dussel habe natürlich vergessen vorher die Domain zu Fragen ob sie auch einen Zweiten Punkt hat, Fragt man nicht vorher und sucht nur nach im ist das Für Excel logischerweise ein Fehler.
Somit sind die Formel dann im Ganzen so aus:
Fertig:
=GLÄTTEN(TEIL(TEIL(A1;FINDEN(".";A1)+1;99);WENN(ISTFEHLER(FINDEN(".";TEIL(A1;FINDEN(".";A1)+1;99))+1);1;FINDEN(".";TEIL(A1;FINDEN(".";A1)+1;99))+1);99))
funzt auch bei nicht third Level Domains und UltraLangen DomainEndungen
ISTFEHLER ist Hundsaltes Excel, in Neuerem kann das Formelwort auch etwas Anders lauten, aber mein privat Pc hat kein Neueres Excel drauf, kann ich aber sonst in der Firma am Montag gerne nachschauen ...
Falls Jemand "Schon" Excel 2016 nutzt, geht das alles auch Ohne Formeln beim Dateneinlesen und vorher aufbereiten über Excel (mach ich beruflich unter Andrem).
Klar gibt es bei Excel immer sehr viele Lösungen, auch bei den Formeln, um an das Ziel zu kommen, ab 10.000 Zeilen müsste ich die Formel nochmal überdenken,zwecks Performanse.
"@Löwe <nach Korrektur2>