Poradna - fixovanie dátumu
Vložení příspěvkuhlavní kategorie | zpět | + odpovědět na toto téma
fixovanie dátumu - diskuze na toto téma |
Ahojte, chcel y som Vás poprosiť o radu pri fixovaní aktuálneho dátumu v bunke, tzn. cez funkciu (DNES), ktorá vloží aktuálny dátum do bunky. Problém vzniká, keď sa zmení deň, tzn. zajtra by sa mi podľa správnosti tento dátum v bunke prepísal na aktuálny deň (systémový dátum), ale to nechcem. Chcem mať fixovaný dátum z dňa kedy som ho do bunky zadal, je možné ošetriť tento problém v rámci kombinácie vzorcov, alebo to ošetrí jedine makro?
Ďakujem pekne za radu. Do bunky sa nedá zároveň zapisovať aj tam mať vzorec. Jediné riešenie bez makra ma napadá takéto. Meníte dátum na Vami požadovaný v zelenej bunke. Dátum ktorý požadujete bude v červenej bunke a to podľa zaškrtnutia políčka "Aktuálny dátum". Ale myslím, že to je logické.
Dalo by sa ešte cez zapnutie "Súbor - Možnosti - Vzorce - Povoliť iteračný výpočet", ale t by ste tiež nemohli vkladať udáj do bunky kde je vzorec. Odpověď ďakujem za reakciu :)
možno som úplne presne nepopísal tú požiadavku, lebo nemal som v pláne v jednej bunke zároveň uvádzať vzorec aj písať, skôr by som toto chcel uplatniť pri zadaní napr. v stĺpci A ak si užívateľ vyberie meno a do ďalšieho stĺpca sa doplní automaticky aktuálny dátum, aby si dotyčná osoba nemusela tento dátum manuálne vpisovať. Bez makra to asi nepôjde :) Odpověď Ne bez makra to opravdu nepůjde. Další možností je zásah uživatele s využitím klávesové zkratky CTRL+; Odpověď Vymente Vnútro tej procedúry, čo som Vám poslal minule a vyskúšajte. Píšem to len z hlavy na tablete, nemám ako otestovať.
Dim Zmena as Range
Set Zmena=Intersect(Target, Columns(1))
If Not Zmena Is Nothing Then If Zmena.Cells(1,1)<>"" Then Cells(Zmena.Cells(1,1).Row,2)=Date() Odpověď Upravil som Vám to tak, že Môžete zmeniť aj viac buniek naraz, aktuálny dátum sa nastaví pre všetky, zároveň som Vám pridal aj mazanie dátumu po vymazaní mena. Mená sa načítavajú dynamicky z listu Mená. Odpověď |