MS Excel

Dobrý den,

potřeboval bych poradit, mám v sešitě datum a potřeboval bych aby když provedu nějakou změnu a uložím jí změnil se mi datum v dáné buňce.

Díky za radu.

Zaslat odpověď >

qviz(13.7.2011 9:09)#005488

Zkus =DNES()citovat

carno(13.7.2011 9:16)#005489

To tam právě mam a já potřebuji změnit datum jen při změně. Při použití funkce Dnes() se datum aktualizuje při každém otevření sešitu.citovat

Poki(13.7.2011 9:22)#005490

tak to potrebujes makro.
Pak je ale potreba vedet, pri zmene jake bunky (oblasti) se ma datum zmenit (jake to datum ma byt) a v jake bunce to datum je.

Jestli jsou nejake dalsi omezujici podminky, kdy se ma datum zmenit...tak samozrejme taky.

Nejlepsi je prilozit vzorovy sesit!citovat

Richard99(13.7.2011 9:27)#005491

=DNES

nevloží datum do buňky, ale funkci, která zobrazuje aktuální datum a čas. Při otevření bude ukazovat aktuální datum, nikoliv datum posledního uložení.

navrhuji následující

Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Sheets("List1").Range("A1")
.Value = Now()
.NumberFormat = "d/m/yy"
End With
End Subcitovat

Poki(13.7.2011 9:33)#005492

To Richard99: To asi nebude to pravy, protoze kdyz ulozis do bunky funkci, tak pri kazdym otevreni bude zobrazovat aktualni datum.
Rekl bych, ze Carno potrebuje neco, co bude ve skutecnosti znamenat datum provedeni zmeny (a to rozhodne funkce DNES neumi...)

Pokud bys chtel pouzit tu proceduru, tak bys mel pouzit spis _Change nez BeforeClose, protoze nekde muze zavrit sesit bez zmeny a ty bys ulozit jine datum, ktere nebude odpovidat pozadavku...citovat

carno(13.7.2011 10:55)#005493

Díky, funguje to...citovat

Téma: aktualizace datumu

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje