Difference between revisions of "Excel"
From Blue-IT.org Wiki
| Line 1: | Line 1: | ||
=== Kalenderwoche === | === Kalenderwoche === | ||
| + | * http://www.herber.de/forum/archiv/476to480/478449_Excelfunktion_in_VBA.html | ||
ActiveCell.FormulaR1C1 = _ | 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]))" | "=CONCATENATE(""0"",TRUNC((RC[-25]-DATE(YEAR(RC[-25]+4-WEEKDAY(RC[-25],2)),1,-9+WEEKDAY(RC[-25],3)))/7),"" / "",YEAR(RC[-25]))" | ||
Revision as of 09:37, 9 July 2014
Kalenderwoche
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]))"