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)
LO 6.1.2.1. (x64) WIn 8 64bit 16GB RAM