Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Schleife für Formatumwandlung

Forumthread: Schleife für Formatumwandlung

Schleife für Formatumwandlung
28.05.2007 23:08:00
Jörg
Hallo,
wir kann ich bei der folgenden Anweisung eine Schleide einbauen.
Somit das die Felder E1+x bzw. F1+x angesprochen werden. so das ich in einer Spalte alle Zeilen nacheinander Umformatieren kann.

Sub Datum_Format()
Range("E1") = Format(Range("E1"), "dd.MM.yyyy")
Range("F1") = Format(Range("F1"), "hh:mm:ss")
End Sub


Vielen Dank und Viele grüße
Jörg

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Schleife für Formatumwandlung
28.05.2007 23:36:00
Jens
Hallo Jörg
Hab es zwar nicht getestet, aber versuch mal:

Sub Datum_Format()
Dim i As Integer
Dim x As Integer
x = Range("E65536").End(xlUp).Row
For i = 1 To x
Cells(i, 5) = Format(Cells(i, 5), "dd.MM.yyyy")
Cells(i, 6) = Format(Cells(i, 6), "hh:mm:ss")
Next i
End Sub


Gruß aus dem Sauerland
Jens

Anzeige
Danke AW: Schleife für Formatumwandlung
28.05.2007 23:49:00
Jörg
Vielen Dank Jens und einen schönen Abend

Danke für Rückmeldung :-) oT
28.05.2007 23:50:27
Jens

Nachtrag
29.05.2007 23:02:00
Jens
Hallo Jörg
Hab noch nen Fehler entdeckt:
Deklariere mal "i" und "x" als long und nicht als integer.
Gruß aus dem Sauerland
Jens
Anzeige

Forumthreads zu verwandten Themen

Anzeige