Recheblatt aus 1 Spalte 2 Spalten machen.

Hallo Gianni

Da ich weiss, dass deine Firma in der Schweiz ist, gehe ich in einer ersten Version davon aus, dass alle PLZ 4stellig sind. Auch die Formel schreibe ich in der DE-CH-Schreibweise, also mit doppelten Anführungszeichen für Text.

Ich nehme ausserdem an, dass deine Tabelle ine Kopfzeile enthält. Falls nicht, kannst du nur «LfdZelle≠““» statt dem "Und(…)" als Suchlaufbedingung schreiben. Schliesslich setze ich auch voraus, dass zwischen PLZ und Ortsname immer ein Leerzeichen steht.

Füge zuerst mal 2 neue Spalten rechts von Spalte E ein, also F und G. Wähle irgend eine Zelle im Rechenblatt ausserhalb des benutzten Bereichs. Setze dort folgende Formel ein:

VSuchlauf(E:E;Und(LfdIndex>1;LfdZelle≠"");;SetzeZelle(Links(LfdZelle;4);F:F;LfdIndex)&SetzeZelle(Teil(LfdZelle;6;50);G:G;LfdIndex))

Sollten ungleich lange PLZ vorkommen, so würde folgende Formel helfen, welche die Zelle Z1 als Zwischenspeicher benützt:

VSuchlauf(E:E;Und(LfdIndex>1;LfdZelle≠"");;SetzeZelle(Finden(" ";LfdZelle);Z1)&SetzeZelle(Links(LfdZelle;Z1-1);F:F;LfdIndex)&SetzeZelle(Teil(LfdZelle;Z1+1;50);G:G;LfdIndex))

Jetzt wichtig: Unbedingt die Formel löschen, bevor du die Spalte E löschst!

Gruss, Thomas