Fórum pro uživatele kancelářského balíku OpenOffice | LibreOffice
 

#1 30. 11. 2010 15:16:56

dech
Člen
Registrace: 1. 10. 2008
Příspěvků: 146

Jak změnit formát dat pomocí makra

Ahojte, mám sloupec dat - datumů, které jsou bohužel v textovém formátu: '30.12.2010
Proto abych je převedl na datumy (jde s nima počítat a měnit jim formát dat třeba na "DD/MM") musím normálně použít fci.: =VAULE(A1)  a ta mi to opravdu převede na to správné netextové datum.
Jde nějak to převedení z textového formátu na číselný vnést do makra aniž bych musel kolem zdrojových dat mít jiné vzorečky(VALUE..)?

mám na mysli něco takového,ale nefunguje to-z pochopitelných důvodů jak níže uvidíte v kódu, ale když se na to někdo kouknete tak možná budete vědět co na tom zpravit-o co to doplnit:

Sub Makro
list = ThisComponent.getSheets().getByName("list1")
zdroj = list.getCellRangeByName("A1:A1000").value  'bohuzel nezíská žádné
hodnoty protože je v bunkách text
list.getCellRangeByName("A1:A1000").setvalue(zdroj)
end sub

NEBO

Sub Makro2
list = ThisComponent.getSheets().getByName("list1")
zdroj = list.getCellRangeByName("A1:A1000").getRangeAddress()
cil = list.getCellRangeByName("A1:A1000").getRangeAddress()
list.copyRange(cil,zdroj)      'stale mi tu chybi zmena z textu
na cisla=datum
end sub

dobrý začátek by byl, kdybych zjistil jak úspěšně pomocí makra (ne pomocí vzorečku(VALUE) v listě) změnit bunku jako text na bunku jako cislo.
diky

Editoval dech (30. 11. 2010 15:24:40)


OO 3.2.1  WIn 8 64bit  16GB RAM

Offline

#2 30. 11. 2010 20:04:45

hanus
Člen
Místo Olomouc
Registrace: 29. 11. 2006
Příspěvků: 573
Web

Re: Jak změnit formát dat pomocí makra

Co takhle Úpravy->Najít a nahradit? Najít apostrof a nahradit ho ničím, tj. smaže se.

Editoval hanus (30. 11. 2010 20:05:43)

Offline

#3 1. 12. 2010 00:09:57

dech
Člen
Registrace: 1. 10. 2008
Příspěvků: 146

Re: Jak změnit formát dat pomocí makra

wow...tak jsem to zkusil,ale nepochopitelně nešla najít ta apostrofa ' a proto taky nemohla být nahrazena a z textu se nemohlo stát číslo. Pak jsem tady na foru ale nasel podobny pripad, kdy ale z textu cislo udelali tak ze našli tečku "."  a nahradili tečkou "."  . Pro mě nepochopitelné, ale fungovalo to! Sice mám makro nahrané stále rekordérem, ale už tam nefiguruje vzorec VALUE a jeho kopírování zpět do zdrojového sloupce a místo toho je to omezeno na operaci nahrazení symbolů - pomocí makra. Takže s tímhle jsem spokojen. Díky za navedení na správnou kolej!


OO 3.2.1  WIn 8 64bit  16GB RAM

Offline

Zápatí