Ausdruck als Text formatieren

Computer: Software & Programmierung Office Software
1

Hallo,
ich habe in einer Spalte Zahlen stehen, die ein festes 7stelliges Format haben, also mit führenden Nullen. Dazu habe ich ein benutzerdefiniertes Format erstellt in der Form 000000. Dies funktioniert auch. Nun will ich die Zahlen aber als Text in dieser Darstellung haben (z.B. 0000015). Verwende ich dann das Format „Text“, werden wieder alle führenden Nullen abgeschnitten. Wie bringe ich das Textformat dazu, führende Nullen zu behalten unter Beibehaltung konstanter Größe (hier: 7stellig)???
Vielen Dank schon mal für eure Hilfe!
Bernhard

2

Hallo

Nun will ich die Zahlen aber
als Text in dieser Darstellung haben (z.B. 0000015). Verwende
ich dann das Format „Text“, werden wieder alle führenden
Nullen abgeschnitten.

Verwende die Formel =TEXT(15;„0000000“)

Gruß Andreas

3

Hallo Bernhard,

markiere die Zellen, in der diese „Zahlen“ stehen und laß folgendes Makro ablaufen:

Sub Zahl2Text()
Dim c As Object
For Each c In Selection
 With c
 If Len(.Text) \> 0 Then
 .Value = "'" & .Text

 End If
End With

Next c

End Sub

gruss
moritzbock

4

Danke, so was hab ich gesucht! Funktioniert!