Hallo,
eine ganz kurze Frage… Was muss ich tun um Jahr/KW angezeigt zu bekommen? Die KW´s sollen immer 2 stellig sein. Normalerweise wird bei KW 1-9 keine null davor angezeigt. Ich hätte mein KW Feld aber gerne in diesem Format:
07/01
Mit yy/ww gehts leider nicht. Dann bekomme ich immmer 07/1 ausgegeben.
Sonstige versuche wie yy/ww;0 sind kläglich gescheitert.
Hat jemand eine Lösung dafür?
Gruß
Frank
Hallo Frank,
eine ganz kurze Frage… Was muss ich tun um Jahr/KW angezeigt
zu bekommen? Die KW´s sollen immer 2 stellig sein.
Hat jemand eine Lösung dafür?
da hilft nur ein wenig VBA …
MeineInfo = xWoche_Jahr(meinDatum)
Hier die ausführliche Version:
Public Function xWoche_Jahr(xDatum)
Dim xJ, xW
xJ = Format(xDatum, „yy“, vbMonday, vbFirstFourDays)
xW = Format(xDatum, „ww“, vbMonday, vbFirstFourDays)
xWoche_Jahr = Right(„00“ & xJ, 2) & „“ & Right(„00“ & xW, 2)
End Function
und hier die gekürzte Version 
MeineInfo = WJ(meinDatum)
Public Function WJ(xD)
WJ = Right(„00“ & Format(xD, „yy“, 2, 2), 2) & „“ & Right(„00“ & Format(xD, „ww“, 2, 2), 2)
End Function
Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)
Danke klappt!
Stern für dich 