Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
16.10.2025 00:15:51
Passwort im Herbersforum ändern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1108to1112
1108to1112
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wertformatierung

Forumthread: Wertformatierung

Wertformatierung
Andre
Hallo,
ich suche nach einer Lösung für folgendes Problem. Aus einer Anwendung bekomme ich Werte
geliefert (Antw) in Form von Strings. Diese Werte werden in Zellen eingetragen: 

Worksheets("Tabelle1").Range("B8").Value = Antw
Die Variable "Antw" enthält ua. auch das Datum und zwar die ersten 10 Stellen von links. Bisher löse ich das Problem so: 


Range("B8") = Left(Range("B8"), 10)
Um den Code etwas zu optimieren, habe ich folgendes versucht: 


Worksheets("Tabelle1").Range("B8").Value = CDate(Antw)
oder 


Worksheets("Tabelle1").Range("B8").Value = Antw(Left(Range("B8"), 10))
Beides funktioniert nicht.
Gibt es dafür eine Lösung?
Für Info's wäre ich sehr dankbar!
Gruß Andre
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wertformatierung
13.10.2009 10:00:55
Björn
Hallo Andre,
Worksheets("Tabelle 1").Range("B8").Value = Left(Antw, 10)
Gruß
Björn B.
AW: Wertformatierung
13.10.2009 10:02:08
Josef
Hallo Andre,

Worksheets("Tabelle1").Range("B8") = CDate(Left(Antw, 10))

Gruß Sepp

Anzeige
AW: Wertformatierung
13.10.2009 11:53:13
Andre
Hallo,
vielen Dank euch beiden!!! Habe wieder etwas dazu gelernt.
Ich habe das jetzt nur "trocken" in einer Tabelle getestet. Der String hat folgenden Aufbau:
2009-10-12T... mir fällt gerade auf, ich weiß nicht genau, wie der String zB. für August aussieht. Steht dort dann 2009-8-12T... funktioniert das natürlich nicht. Das T steht aber immer nach dem Datum, könnte man das evtl. in die Formatierung einbauen?
Gruß Andre
Anzeige
AW: Wertformatierung
13.10.2009 12:06:10
Josef
Hallo Andre,
If InStr(1, antw, "T") > 0 Then
  Worksheets("Tabelle1").Range("B8") = CDate(Left(antw, InStr(1, antw, "T") - 1))
End If

Gruß Sepp

Anzeige
AW: Wertformatierung
13.10.2009 12:15:47
Andre
Hallo Josef,
vielen Dank für den Code, habe ihn getestet, funktioniert super!
Gruß Andre
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige