ich suche eine Formel. Die mir folgende Datumswerte liefert " Heute ist der "xxx" Tag im " xxx " Quartal und die " xxx " Woche.
Das Datum beziehe ich aus AG1 mit der Formel gleich Heute()
Gruss Petra
Function akt_quartal()
akt_quartal = Round(Month(Now) / 3)
End Function
Function akt_woche()
akt_woche = Round((DateDiff("d", DateValue("01.01." & Year(Now)), Now) + 1) / 7)
End Function
Function tage_akt_quartal()
tage_akt_quartal = DateDiff("d", DateValue("01." & ((akt_quartal - 1) * 3) + 1 & "." & Year(Now)), Now)
End Function