JT napsal(a):
Zkoušel jsem dostat to datum do buňky pomocí makra,ale asi jsem blbej,
fakt se mě to nedaří. Nepomůže mě prosím někdo?
Do makra se mi moc nechce, protože by to mělo být implementováno
jednodušeji a přirozeněji, snažil jsem se to navrhnout jako vylepšení,
můžete podpořit hlasováním:
http://qa.openoffice.org/issues/show_bug.cgi?id=64563
Já bych si to představoval v basicu nějak takto:
1. vytvořit makro co umí zapsat datum do nějaké buňky, případně do buňky kde je
kurzor
sub ZapisDatum
oDoc = ThisComponent
' ziskat odkaz na vytvořené datove pole, které pojmenujeme třeba "DateField1"
oDatum = objekt_formulare_listu_nevim_jak_se_jmenuje.GetControl("DateField1")
' zapsat do vybrané buňky, v tomto případě A1 prvního listu
' funkce Iso2Cdat() převádí na hodnotu na řetězec - jink mi to (jinde)
nefungovalo korektně
oDoc.sheets(0).getCellByPosition(0,0).Value =
dateValue(Iso2Cdat(oDatum.model.date))
end sub
2. ve vlastnostech našeho pole v "Události/Při ztrátě zaměření" (nebo nějaké
jiné
vhodnější události) natavit spuštění makra "ZapisDatum"
3. ohlídat aby bylo skutečně makro uloženo a přiřazeno v souboru kde je Datové
pole,
jinak to na jiném PC nebude fungovat.
To je vše, co mě momentálně napadá.
Pokud někdo ví jak získat odkaz na objekty polí umístěných na listech (viz
ODatum = ...)
tak mu budu vděčný, když to sem sdělí. Předpokládám že to jde.
Zdraví
Tom B.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
