Excel

From Blue-IT.org Wiki

Revision as of 09:37, 9 July 2014 by Apos (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

Kalenderwoche

http://www.herber.de/forum/archiv/476to480/478449_Excelfunktion_in_VBA.html

ActiveCell.FormulaR1C1 = _
"=CONCATENATE(""0"",TRUNC((RC[-25]-DATE(YEAR(RC[-25]+4-WEEKDAY(RC[-25],2)),1,-9+WEEKDAY(RC[-25],3)))/7),"" / "",YEAR(RC[-25]))"

Retrieved from "https://wiki.blue-it.org/index.php?title=Excel&oldid=5285"