Funkce Sumifs mě nechce vzít datum vložené makrem

[luko02420]

Dobrý den, potřeboval bych od místních odborníku poradit.
Mám tabulku kde pomocí makra doplňuji hodnoty z jiného listu. To funguje dokonale.
Na listě kde doplňuji data, se mi pomoci procedury "Private Sub Worksheet_Change(ByVal Target As Range)"
vkládá do sloupce A datum podle, kterého se mi do řádku vypisují hodnoty za určité období přes fc Sumifs.
A tady je problém, pokud zapíši datum ručně vše funguje.
Pokud se datum vloží procedurou tak nefunguje. Jde to nějak pořešit.
Zkoušel jsem i kontingenční tabulku, ale s ní jsem nebyl spokojený.

Děkuji všem za radu

[atari]

Cells(i, 1).Value = Date + 1

[luko02420]

Perfektní funguje skvěle, to mě vůbec nenapadlo