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

Spalten markieren und String Datum ../../..../

Forumthread: Spalten markieren und String Datum ../../..../

Spalten markieren und String Datum ../../..../
29.06.2003 14:31:27
Volker
Guten Tag

Hoffe auf Hilfe bei folgendem Problem. Suche eine Möglichkeit in Excel eine Spalte zu markieren und mittels Command - Button diesen String zu teilen - über Coding.
Es kann sich um mehrere tausend Datensätze handeln.

Beispiel:02.02.2003

Es sollte rechts neben der Spalte z.B B drei neue Spalten eingefügt werden und in diese dann jeweil der Teilstring . C = "02" D = "02" E = "2003" in Zahlenformat.

Ist sowas möglich....

Vielen Dank für die Hilfe

Volker
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Spalten markieren und String Datum ../../..../
29.06.2003 14:56:57
PeterW
Hallo Volker,

handelt es sich um Strings oder um Daten?

Gruß
Peter


AW: Spalten markieren und String Datum ../../..../
29.06.2003 15:00:36
Volker
Hallo Peter

Danke fürs melden.
Es handelt sich um Datumsfelder ....die, da muss ich jetzt nachsehen als Text rüberkommen.

Volker


AW: Spalten markieren und String Datum ../../..../
29.06.2003 15:07:02
PeterW
Hallo Volker,

hier hast du beide Varianten.

Gruß
Peter

Sub aufteilen()
Dim count As Long
Dim lgletzte As Long
lgletzte = Range("A65536").End(xlUp).Row
Columns("B:D").Insert

For count = 1 To lgletzte
'für echte Daten
'Cells(count, 2) = Day(Cells(count, 1))
'Cells(count, 3) = Month(Cells(count, 1))
'Cells(count, 4) = Year(Cells(count, 1))

'für Text
Cells(count, 2) = Left(Cells(count, 1), 2)
Cells(count, 3) = Mid(Cells(count, 1), 4, 2)
Cells(count, 4) = Right(Cells(count, 1), 4)
Next
Columns("B:D").NumberFormat = "General"

End Sub


Anzeige
AW: Spalten markieren und String Datum ../../..../
29.06.2003 15:14:41
Volker
Hallo Peter

Danke war wieder mal zu faul.Jetzt wo ich die Lösung sehe scheint es logisch,
ist immer so.
Herzlichen Dank.

Wünsche noch einen schönen Sonntag.

Volker


Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige