Pomoć
|
potrebna pomoc
|
|
|||
|
Pozdrav!
imio jednu kolonu gde se upisuje trenutno vreme pomocu funkcije NOW koja je u macrou ubacena, ovde upisano datum() =IF(D26322="";"";Datum()) znaci kad se ukucaju podaci o nekoj drugoj koloni tek onda ce upisati datum i vreme kad je ukucano. i tako za svaki red koji se kuca. problem nastaje kad se pokuca sacuvati ili otvoriti dokumenat on radi rekalkulaciju svih celija koje imaju funkciju i upisuje nam trenutno vreme u sve celije. dakle kako iskljuciti rekalkulaciju ili kako ga naterati da vrednost funkcije koju uredno prikaze kao rezultat i sacuva. inace probao sam da iskljucim u meniju tools/cell contents one opcije ali se isto ponavlja. Da li postoji neki drugi nacin da dobijem isto u openoffisu posto ovaj predhodni lepo radi u MS Office? |
|||
|
|
|||
|
U sub, 17. 05 2008. u 08:18 +0200, DELTA TAXI piše:
> =IF(D26322="";"";Datum()) Zdravo, Da, izgleda da se prilikom učitavanja dokumenta sve funkcije ponovno izračunavaju, bez obzira na postavku u Tools > Cell Contents (Alat > Sadržaj ćelije). Rešenje bi bilo da pri čuvanju dokumenta napravite Edit > Paste Special (Uređivanje > Posebno ubacivanje) tako da ćelija više ne sadrži formulu već samo tekstualno vrednost. (Pre toga ćelije treba formatirati kao datumsko polje u Format > Cells..., tj. Format > Ćelije...) Kako je to zamorno, može da se napiše makro procedura koja to radi automatski, i onda da se u okviru dokumenta registruje na Save i Save As događaje u Tools > Macros > Organize macros > OpenOffice.org Basic... > Assign > kartica Events. (Alat > Makroi > Organizuj makroe > OpenOffice.org Basic > Dodeli > kartica Događaji) Proceduru je pak moguće napraviti korišćenjem opcije za snimanje makroa, uz kasnije sitne izmene, a kod (koji menja kolonu C) sledi u nastavku. pp, Goran Rakic http://sr.openoffice.org rem rem Goran Rakic, rem rem iz kolone C uklanja formule a zadrzava vrednosti rem rem sub TaknutoMaknuto dim document as object dim dispatcher as object document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") rem oznaci kolonu dim sheet as object dim col as object sheet = ThisComponent.getSheets().getByIndex(0) rem PROMENI 2 U INDEKS KOLONE, A JE 1, B JE 2 ITD. col = sheet.getColumns().getByIndex(2) ThisComponent.getCurrentController().select(col) dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array()) dim args4(5) as new com.sun.star.beans.PropertyValue args4(0).Name = "Flags" args4(0).Value = "SVDT" args4(1).Name = "FormulaCommand" args4(1).Value = 0 args4(2).Name = "SkipEmptyCells" args4(2).Value = false args4(3).Name = "Transpose" args4(3).Value = false args4(4).Name = "AsLink" args4(4).Value = false args4(5).Name = "MoveMode" args4(5).Value = 4 dispatcher.executeDispatch(document, ".uno:InsertContents", "", 0, args4()) end sub |
|||
|
