Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
880to884
880to884
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen lassen sich nicht formatieren, nochmals

Zellen lassen sich nicht formatieren, nochmals
25.06.2007 16:11:45
gromminger
Hallo.
Ich habe den Beitrag im Forum gelesen und den Ansatz

Sub Zellen_umwandeln()
Dim rngCell As Range
For Each rngCell In Selection
rngCell.NumberFormat = "dd.mm yyyy"
SendKeys "{F2}", True
SendKeys "{ENTER}", True
Next
End Sub


probiert.
Leider bekomme ich bei dieser Umwandlung aber aus "200607"
das Ergebnis 28.03.2449 zurück, anstatt: 01.07.2006.
Was mache ich falsch?
Gruss,
Gromminger

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen lassen sich nicht formatieren, nochmals
25.06.2007 16:19:50
Renee
Mazwara Gromminger,
Wenn Deine Datums(zahlen) so vorliegen, wie Du schreibst, dann müsste das Makro so lauten:

Sub Zellen_umwandeln()
Dim rngCell As Range
For Each rngCell In Selection
rngCell.Value = DateSerial(Left(rngCell.Value, 4), Right(rngCell.Value, 2), 1)
rngCell.NumberFormat = "dd.mm.yyyy"
Next
End Sub


Greetz Renee

AW: Zellen lassen sich nicht formatieren, nochmals
25.06.2007 16:30:00
gromminger
Dann meckert der Compiler "Type Mismatch" bei
rngCell.Value = DateSerial(Left(rngCell.Value, 4), Right(rngCell.Value, 2), 1)

AW: Zellen lassen sich nicht formatieren, nochmals
25.06.2007 16:38:09
Renee
Hi Gromminger,
Ich hab geschrieben : Wenn Deine Datums(zahlen) so vorliegen... und es auch so gemeint.
Wenn Du Test's einbauen willst, vielleicht so:

Option Explicit
Sub Zellen_umwandeln()
Dim rngCell As Range
For Each rngCell In Selection
If Val(rngCell.Value) = rngCell.Value And _
rngCell.Value > 190001 And rngCell.Value 


Greetz Renee

Anzeige
AW: Zellen lassen sich nicht formatieren, nochmals
25.06.2007 16:41:00
gromminger
Hallo Renee,
wer lesen kann ist klar im Vorteil :-)
Du hast natürlich recht.
Das Programm läuft so jetzt wunschgemäss - vielen Dank.
Gromminger

344 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige