Office 2013: Telefonnummer umwandeln

[Frankym112]

Hallo beinander,

bin neu hier und brauch mal eure Hilfe bei Excel - 2013....

hab nix passendes gefunden --drum meine Bitte an euch - Profis   

ich hab folgendes Telefonnummernformat: +43 (340) 727 59 67 und ich brauch folgendes Format: 433407275967

da ich hier einige Hundert aus meiner Datenbank habe und umstellen will, benötige ich dies im neuen Format...
die Nummernlänge ist unterschiedlich..

wie mach i das???

danke für eure Hilfe
Franky

[Officer]

Hallo Franky,

da gibt es ein paar Möglichkeiten. Die einfachste dürfte unter Excel 2013 die Blitzvorschau-Funktion sein.
Hier habe ich dazu eine Anleitung verfasst: http://www.excel-inside.de/funktionen-a-tipps/970-erl%C3%A4uterung-der-blitzvorschau-funktion

Als Einfach neben die erste Telefonnummer das gewünschte Format eintragen und die Blitzvorschau aufrufen.

Viele Grüße

Alois
[Officer]

[mumpel]

Hallo!

Oder per Makro. Im Beispiel stehen die Nummern in Spalte A ab Zeile 2.

Code: Visual Basic

1. Public Sub ReFormattingPhoneNumbers()
2. Dim cellCount As Long
3. Dim lastCell    As Long
4.  
5. lastCell = Range("A" & Rows.Count).End(xlUp).Row
6.  
7. For cellCount = 2 To lastCell
8.      Cells(cellCount, 1).Value = Replace(Cells(cellCount, 1).Value, "(", "")
9.      Cells(cellCount, 1).Value = Replace(Cells(cellCount, 1).Value, ")", "")
10.      Cells(cellCount, 1).Value = Replace(Cells(cellCount, 1).Value, " ", "")
11.      Cells(cellCount, 1).Value = Replace(Cells(cellCount, 1).Value, "+", "")
12. Next cellCount
13.  
14. End Sub
15.  

Gruß, René

[Frankym112]

Hey...

super.. das ging ja flott :-)

wie mach i das mit Makro?...

will beide Versionen ausprobieren 

danke
Franky

[mumpel]

1. ALT+F11. Damit kommst Du in den VBA-Editor
2. Ein neues Modul einfügen und dorthinein das Makro.
3. Makro noch Deinen Erfordernissen anpassen und ausführen. Dabei darauf achten dass das richtige Tabellenblatt aktiv ist.

[Officer]

Hallo Franky,

wenn´s dir um´s ausprobieren geht, dann hab ich noch eine Formel-Lösung für dich.

Die folgende Formel geht davon aus, dass deine zu bereinigende Telefonnummer in Zelle A1 steht:

=WECHSELN(WECHSELN(WECHSELN(WECHSELN(A1;"+";"");"(";"");")";"");" ";"")

Die Formel kannst du einfach nach unten kopieren.

Gruß Alois
[Officer]

[Frankym112]

Hey...

Toll...

DANKE ....

i probiers dann mal gleich aus.. melde mich nochmal, wenn ich eure hilfe benötige :-)

[Frankym112]

Hallo,

hod super gfunzt....

Danke für eure schnelle und unkomplizierte Hilfe...

Super Forum

da komm i öfter;-)