AdressListe umgestalten und Tel.Nr. anpassen

Liebe Excel Freunde
Mit Mühe und Not habe ich das Adressbuch von meinem Mobile-Phone als ".txt" in eine Excel Tabelle importiert. Leider ergeben sich durch die Darstellung einige Hindernisse.
Durch das Importieren sind auch alle Nullen "0" (Tel-Vorwahl) abhanden gekommen. Auch mit der manuellen Formatierung kann ich Excel leider nicht beibringen ob jetzt 2 od. nur 1ne "0" vorne dargestellt werden soll. Alle Daten sind innerhalb der gleichen Excel Tabelle.
Ich versuche es darzustellen - Momentan sieht es ungefähr so aus: "() = leer"
............E.........................F
..3...Vorname:............()
..4...Nachname:..........Mailbox - Aus
..5...Telefon:...............##002#
..6..........()
..7...Vorname:............()
..8...Nachname:..........Mailbox - Ein
..9...Telefon:...............**004*086078843444#
10..........()
11...Vorname:............()
12...Nachname:..........OIB - A
13...Telefon:...............48501748745
14..........()
15...Vorname:.............Pavel
16...Nachname:...........Home
17...Telefeon:..............41449107117
18...()
19...Nachname:..........()
20...Telefon:................787761572
21
22...Nachname:..........Dr. Müller
23...Telefon:................767861423
24
25...Vorname:............Mirko
26...Nachname:..........Milkovich
26...Telefon:...............38514585164
27
28...etc....
d.h. manchmal fehlt der Vor- od. Nachname und manchmal die ganze Zeile.
So stelle ich es mir schliesslich fertig vor!:
..........A.....................B...........................C
..1...Vorname......Nachname.................TEL.................[Überschrift]
..2...().................Mailbox - Aus...........##002#
..3...().................Mailbox - Ein............**004*086078843444#
..4...().................OIB-A.......................48501748745
..5...Pavel...........Home.......................0041449107117
..6...().................().............................0787761572
..7...().................Dr. Müller.................0767861423
..8...Mirko...........Milkovich...................0038514585164
..9
10...etc...
Mit anderen Worten es soll "mindestens" 1ne Null überall vorne drannstehen, wobei bei manchen Nummern eigentlich 2 Nullen vornedrann müssten - z.B. bei CH-Vorwahl "0041" Bsp. "C5" od. KRO-Vorwahl "00385" Bsp. "C8" für die CH-Handy-Vorwahlen 076, 077, 078, 079 u.a. ist freilich nur 1ne Null davor.
Falls jemand mir helfen könnte - wäre ich sehr dankbar - bei ca. 1550 Zeilen ist dies von Hand sehr mühsam zu realisieren - deshalb suche ich eine Formel.
In erster Linie wäre ich nur schon mit der neuen Darstellung an sich zufrieden (ohne Nullen-Chaos).
Danke Pavel

Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Benutzer

Tabellenblatt: [Mappe1]!Tabelle1 │ A │ B │ C │ D │ ---┼---------┼---------------┼---------------------┼---┼ 1 │ Vorname │ Nachname │ Telefon │ 1 │ ---┼---------┼---------------┼---------------------┼---┼ 2 │ │ Mailbox - Aus │ ##002# │ 1 │ ---┼---------┼---------------┼---------------------┼---┼ 3 │ │ Mailbox - Ein │ **004*086078843444# │ 1 │ ---┼---------┼---------------┼---------------------┼---┼ 4 │ │ OIB - A │ 048501748745 │ │ ---┼---------┼---------------┼---------------------┼---┼ 5 │ Pavel │ Home │ 0041449107117 │ 2 │ ---┼---------┼---------------┼---------------------┼---┼ 6 │ │ │ 0787761572 │ 2 │ ---┼---------┼---------------┼---------------------┼---┼ 7 │ │ Dr │ 0767861423 │ 2 │ ---┼---------┼---------------┼---------------------┼---┼ 8 │ Mirko │ Milkovich │ 0038514585164 │ │ ---┼---------┼---------------┼---------------------┼---┼ 9 │ │ │ │ 3 │ ---┼---------┼---------------┼---------------------┼---┼ 10 │ │ │ │ 3 │ ---┼---------┼---------------┼---------------------┼---┼ 11 │ │ │ │ 3 │ ---┼---------┼---------------┼---------------------┼---┼ 12 │ │ │ │ │ ---┴---------┴---------------┴---------------------┴---┴ Benutzte Formeln: A2 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) A3 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) A4 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) usw. in A B2 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) B3 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) B4 : =WENN(ISTNV(Such);"";WENN(Such=0;"";Such)) usw. in B C2 : =WENN(ISTNV(Such2);"";Such2) C3 : =WENN(ISTNV(Such2);"";Such2) C4 : =WENN(ISTNV(Such2);"";Such2) usw. in C D4 : =WENN(E3&F3="";D2+1;WENN(E4&F4="";"";D3)) D5 : =WENN(E4&F4="";D3+1;WENN(E5&F5="";"";D4)) D6 : =WENN(E5&F5="";D4+1;WENN(E6&F6="";"";D5)) usw. in D Festgelegte Namen: Such : =SVERWEIS(Tabelle1!A$1&":";INDIREKT("E"&VERGLEICH(ZEILE(Tabelle1!$A1);Tabelle1!$D:$D;0)&" _ :F"&VERGLEICH(ZEILE(Tabelle1!$A1);Tabelle1!$D:$D;0)+2);2;0) *rel. Name, so gültig in A2 Such2: =WENN(UND(CODE(Such)>=48;CODE(Such)

Beliebteste Forumthreads (12 Monate)

AdressListe umgestalten und Tel.Nr. anpassen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread