Excel, mathematische Formel?

Hallo, wie kann ich folgenden Formelausdruck

"=("4.1."&I8)+I7*7-7-REST("2.1."&I8;7)+6" per VBA in einer Zelle ausrechnen lassen, wobei I7 die Kalenderwoche und I8 eine Jahreszahl ist?

Den Formelausdruck habe ich von hier:

https://www.business-wissen.de/artikel/excel-tipp-datum-eines-wochentags-aus-kalenderwoche-berechnen/

Danke

Answer 1

[Suboptimierer]

Entweder über die Eigenschaft Formula:

ActiveCell.Formula2Local = "=(""4.1.""&I8)+I7*7-7-REST(""2.1.""&I8;7)+6"

Oder mit VBA-Funktionen

ActiveCell.Value = CDate("4.1." & [I8]) + [I7] * 7 - 7 - (CDate("2.1." & [I8]) Mod 7) + 6

Statt mit CDate kannst du auch mit DateSerial arbeiten.

Comments

[TygaX]

Worin bestehen denn die Vorteile bei den unterschiedlichen Methoden?

[TygaX]

Und wie verweise ich auf das Datenblatt was mir vorliegt? Also I7 und I8 sollen vom Tabellenblatt 2 bezogen werden