Formatierung mitnehmen?

Forumthread: Formatierung mitnehmen?
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Formatierung mitnehmen?

ing.grohn

Hallo Forum,
in einer Tabelle wird ein Feld so dargestellt: 2010-123
Wenn ich dieses Feld mit VBA auslese, erhalte ich den Wert so: 2010123
also ohne die Feldformatierung.
Wie kann ich die Formatierung "mitnehmen".
van Harten bedankt för jor Hülp.
Mit freundlichen Grüßen
Albrecht

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Formatierung mitnehmen?

Hajo_Zi
AW: Formatierung mitnehmen?

Erich
AW: Hajo und Erich

ing.grohn

AW: Formatierung mitnehmen?

10.05.2010 21:37:41

Hajo_Zi

Hallo Albrecht,
Range().Text

AW: Formatierung mitnehmen?

10.05.2010 21:41:00

Erich

Hi Albrecht,
in was für eine Variable liest du den Wert ein?
Damit die Formatierung mitkommen kann, muss das ein String (oder evtl. Variant) sein.
Priobier mal (mit leerem Blatt):


Sub abc()
Dim strX As String
With Cells(1, 1)
.NumberFormat = "0000""-""000"
.Value = 2010123
End With
strX = Cells(1, 1)
MsgBox "A: " & strX
strX = Cells(1, 1).Value
MsgBox "B: " & strX
strX = Cells(1, 1).Text
MsgBox "C: " & strX
End Sub

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

AW: Hajo und Erich

10.05.2010 22:01:04

ing.grohn

Hallo Hajo, Hallo Erich,
sehr schnell, passt genau!
vielen Dank
Mit freundlichen Grüßen
Albrecht
PS wieder was gelernt