Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
872to876
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
872to876
872to876
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Schleife für Formatumwandlung

Schleife für Formatumwandlung
28.05.2007 21: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

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

Betreff
Datum
Anwender
Anzeige
AW: Schleife für Formatumwandlung
28.05.2007 21: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

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

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

Nachtrag
29.05.2007 21: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

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige