VBA: Benutzerdefiniertes Zahlenformat

[HAMRacer44]

Hallo zusammen,

finde mich gerade etwas in VBA ein und habe bisher im Internet nix gefunden.

Ich gebe über ein UserForm im Textfeld eine Zahl ein - soweit klappt alles prima, der Wert wird perfekt übernommen.

Gibt es im VBA eine Möglichkeit, das Zahlenformat zu ändern?

Konkret bräuchte ich einen Schnipsel für das Format "Tag".

Wenn eine 1 steht, soll hinter der Ziffer " Tag" stehen; wenn eine 2 oder größer eingegeben wird, soll hinter der Ziffer " Tage" stehen.

Gibt's da was?

Danke für eure Hilfe schonmal und schönen Start ins WE.

Domi

[RPP63]

Moin!
Warum VBA und warum Userform?
Egal:
Folgendes bendefFormat reicht doch:

	A
1	85 Tage
2	2 Tage
3	1 Tag
4	8 Tage

Zelle	Format	Wert
A1	[=1]0 "Tag";0 "Tage"	85
A2	[=1]0 "Tag";0 "Tage"	2
A3	[=1]0 "Tag";0 "Tage"	1
A4	[=1]0 "Tag";0 "Tage"	8

Gruß Ralf

[HAMRacer44]

Prima, funktioniert einwandfrei (y)

Schönes WE
LG Domi

[RPP63]

Noch ein Zusatz:
Damit es nicht zu dem unschönen Flattersatz kommt und die Zahlen korrekt übereinander stehen, nimmt man besser dieses leicht modifizierte Format:
[=1]0 "Tag"_e;0 "Tage"

Sieht dann so aus: