Aktualizovať dáta v tabuľkovom procesore Excel každý rok

Problém

Mám spolu prepojených 4 tabuliek, ktoré používam na sledovanie mojich účtov.

Všetky 4 tabuľky sú v jednom priečinku.

Na každej tabuľke mám dátum od pondelka do nedele s týždenným súčtom za každý mesiac nadol stĺpcom A.

Mojou dilemou je, že každý rok musím skopírovať celý priečinok, vymazať všetky údaje, ktoré zanechali vzorce, a vymazať všetky dátumy a zmeniť sa na budúci rok, pretože každý rok sa prvý z nich nedostane v ten istý deň. prejsť dlhý proces mazania všetkých a znovu písanie v dňoch, dátumy pre každý týždeň, pridajte riadok na konci týždňa a pokračovať tak, že každá stránka je iný mesiac a týždenné súčty bežia celú cestu cez rok wk1, wk2, wk3, wk4, wk5, wk6 atď.

Vie niekto o ľahší spôsob, ako Excel vedieť, čo deň nový rok začína a vkladá ho do novej tabuľky?

Riešenie

Zistite, či vám toto makro pomôže. Makro vyvolá vstupné pole. tam zadajte rok napr. pre rok 2010 alebo 2011. (Predpokladám, že ste zvyknutý siahať až do konca storočia).

Otestujte makro a rozhodnite sa.

 Sub test () Dim y Ako Integer, d Ako Integer y = InputBox ("typ roka, napr. 2010") Ak y Mod 4 = 0 Potom d = 366 Else d = 365 Koniec If Range ("a1") = "1 / 1 / "& y Rozsah (rozsah (" A1 "), bunky (d, " A ")). DataSeries Rowcol: = xlColumns, _ Typ: = xlChronological, Dátum: = _ xlDay, Krok: = 1, Trend: = False Range ("B1") Vzorec = "= deň v týždni (A1)" Rozsah ("B1") Rozsah automatického dopĺňania (rozsah ("B1"), bunky (d, "B")) Koniec Sub