ich habe eine Spalte mit Datum als Text
und eine Spalte als Datum formatiert.
Ergebnis beider Spalten soll als Text so aussehen(siehe Datei )
Monat.Jahr also z.B.: 02.2014
https://www.herber.de/bbs/user/93404.xlsx
Gruß robert
D | E | |
2 | 02.2014 | 05.2014 |
3 | 02.2015 | 06.2014 |
4 | 05.2014 | 04.2014 |
5 | 10.2014 | 08.2014 |
6 | 03.2014 | 07.2014 |
verwendete Formeln | |||
Zelle | Formel | Bereich | N/A |
D2: D6 | =TEXT(A2*1;"MM.JJJ") | ||
E2:E6 | =TEXT(B2;"MM.JJJJ") |
Excel-Inn.de |
Hajo-Excel.de |
XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007 |
Add-In-Version 18.19 einschl. 64 Bit |
Sub DatumsText()
Const adRelBer$ = "A2:B6"
Dim xDt$, xDz As Range
For Each xDz In Range(adRelBer)
xDt = xDz.Text: xDz.NumberFormat = "@"
xDz = Format(xDt, "mm\.yyyy")
Next xDz
End Sub
Lange nichts von dir gelesen…