převod Excel - Calc nefunkční makra - VYŘEŠENO

praclovicek · 5. 2. 2012 21:44:12

Dobrý večer,
mám u sebe soubor vytvořený v Excelu, který často využívám,
abych se mohl zbavit závislosti na MS Office, potřeboval bych tento soubor
převect do Calcu, bohužel se mi to nedaří, v souboru jsou použity makra
a já s stím nevím rady
Můžete mi s tím někdo pomoci?
Soubor je zde
http://www.uschovna.cz/zasilka/G17UV64YM5CWSW9N-57U

Děkuji za případné rady, odpovědi
Honza

Editoval praclovicek (17. 2. 2012 16:57:48)

j-pastierik · 6. 2. 2012 14:39:52

OpenOffice nepodporuje makra VBA. Prepropramovanie do StarOffice Basic nieco stoji...

praclovicek · 13. 2. 2012 11:26:42

Dobrý den,
s tím jsem ochoten se smířit, máte tedy někdo zájem, případně o jakou částku by se jednalo?
Díky za odpověď

neutr · 13. 2. 2012 19:49:13

Jen malá poznámka: Ten sešit byl s největší pravděpodobností vytvořen ing Janem Podlahou, email jan.podlaha@seznam.cz. (Sešit je podepsán - a na netu je odkaz k tomuto jménu na projektanta TZB tohoto jména, a Vy jste se podepsal jako "Honza".) I když nejde o nic světoborného, tak jsou to aplikace ke komerčním účelům. Mohl by to být malér. Takže pokud nejste Vy sám autorem Excelovské aplikace, požádejte pro jistotu o povolení převodu autora aplikace.
Jinak je to v případě, že by jste chtěl vytvořit vlastní aplikaci se stejnou funkčností, nebo i přibližným grafickým zpracováním (tak, aby se původnímu podobalo, ale byly zřetelné rozdílnosti). Není to nic složitého. Tabulka výpočet je souhrnem, do kterého se podle volby načítají data z jednotlivých listů podle materiálu, kde se pak zpracují pomocí vzorců - ani moc maker to nepotřebuje, pokud vůbec.
Další věc je asi to, že vstupem pro takový sešit bude jiný Excel nejspíš výstup z projekčního programu. Následně lze předpokládat také výstup do rozpočtového programu - například "OCEP". Takže pokud zde mají být nějaké návaznosti, tak s největší pravděpodobností bude jakýkoliv převod, nebo autorské přepracování k ničemu.
Pravdou je to, že lze zadávat data z manuálního zaměření (bez projekčního vstupu) a pro malé zakázky to vyhovuje i bez výstupu do rozpočtového programu. Takže tohle by jste měl vyjádřit a někdo se ozve. (Já osobně zájem nemám. Jsou tu povolanější.)

Editoval neutr (13. 2. 2012 20:13:16)

praclovicek · 14. 2. 2012 06:26:10

Excel jsem upravoval aby byl platný dle současných norem, autor nejsem, máme ho ve firmě, od té mám samozřejmě souhlas k úpravě. To by bylo asi vše k právům autorským.
Co se týká návaznosti na jiné sešity, programy,... nic takového tu není. Manuálně se zde vkládají požadované hodnoty, výstupem je zase jen tento sešit.

praclovicek · 17. 2. 2012 09:15:44

Dobrý den,
tak jsem to nakonec vyřešil sám a bez maker, jediné o co jsem přišel je
"automatické" vkládání nových řádků, tak jsem jich tam přidal dost i na mrakodrap

po pátrání ve firmě, jsem zjistil, že se jedná o tzv. freeware,
pokud byste někdo měl zájem rád zašlu

děkuji za rady

sedlacekdan · 17. 2. 2012 09:46:21

Pokud chcete v OO/LO řešit vložení řádků makrem pak takto:

Sub vloz_radek
doc = thisComponent
list = doc.sheets(0) ' list č. 1
radky = list.rows ' všecny řádky v listu
radky.insertByIndex(0,2) ' vlož na pozici prvního řádku dva nové (pozice řádku, počet nových řádků)
End Sub

POZOR ČÍSLOVÁNÍ ZAČÍNÁ VŽDY NULOU tedy první řádek má číslo 0, druhý má 1 ...

Makro si můžete přiřadit k formulářovému tlačítku.

;o)

praclovicek · 17. 2. 2012 12:45:58

Dobrý den,
děkuji, přiřadil jsem tlačítko, funguje to
upravil jsem to aby to vkládalo pouze 1 řádek,
ale neumím udělat to aby to ten řádek vložilo i se vzorci které jsou v těch předchozích řádcích,
aby to vlastně vkládalo a kopírovalo řádek

sedlacekdan · 17. 2. 2012 15:27:24

Sub vloz_radek
doc = thisComponent
list = doc.sheets(0)
radky = list.rows
radky.insertByIndex(1,1)
oblast = list.getCellRangeByName("A1:C1").RangeAddress
cil = list.getCellRangeByName("A2").CellAddress
list.copyRange(cil, oblast)
End Sub

Makro přidá na pozici druhého řádku nový řádek. Pak zkopíruje buňky v A1:C1 a vloží je do A2:C2.

Oblast je zdroj, ze kterého jsou buňky kopírovány.

Cíl je buňka, ve které začíná vložení buněk ze schránky.

Adresování si změňte podle své potřeby

;o)

praclovicek · 17. 2. 2012 16:57:35

Děkuji moc,
teď to funguje jak má,
pokud bude chtít někdo zaslat tento program, nabídka stále trvá

OpenOffice.cz - web věnovaný kancelářským balíkům OpenOffice.org

#1 5. 2. 2012 21:44:12

převod Excel - Calc nefunkční makra - VYŘEŠENO

#2 6. 2. 2012 14:39:52

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#3 13. 2. 2012 11:26:42

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#4 13. 2. 2012 19:49:13

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#5 14. 2. 2012 06:26:10

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#6 17. 2. 2012 09:15:44

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#7 17. 2. 2012 09:46:21

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#8 17. 2. 2012 12:45:58

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#9 17. 2. 2012 15:27:24

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

#10 17. 2. 2012 16:57:35

Re: převod Excel - Calc nefunkční makra - VYŘEŠENO

Zápatí