Tausendertrennzeichen

Forumthread: Tausendertrennzeichen

23.02.2004 17:58:44

Nico D

Hallo Zusammen,
wie bekomm ich es hin, dass mir Formatierte Zahlenwerte mit Tausendertrennzeichen in ein Userform.label mitgeladen werden?
Grüße
nico

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tausendertrennzeichen

23.02.2004 19:45:30

Ramses
Vielen Dank

25.02.2004 18:05:11

Nico D

AW: Tausendertrennzeichen

23.02.2004 19:45:30

Ramses

Hallo
das kannst du ja sicher anpassen
Option Explicit


Sub Import_Formated_Cell()
Dim nFor As String
nFor = ActiveCell.NumberFormat
Debug.Print nFor
If InStr(1, nFor, "#,##") > 0 Then
Me.textbox1 = Format(ActiveCell.Value, "#,##0.00")
Else
Me.textbox1 = ActiveCell.Value
End If
End Sub

Gruss Rainer

Vielen Dank

25.02.2004 18:05:11

Nico D

Danke

Forumthread: Tausendertrennzeichen

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread