Další článek, který člověka zahltí a nemotivuje ho k naučení maker. Literatura, pořádná, žádná; jenom miliony stránek k programování maker, která stojí za h _ _ _ o. Proč? Protože většina z nich jen popisuje, co už tady stokrát bylo a nebo skončí dřív, než se člověk stačí něco naučit. Proč nezačnete opravdu seriál o makrech v OO, který popisuje je kompletní a je doložen spousty praktických příkladů, které přidávají na obtížnosti?
Písal som a chcem písať seriál o programovaní makier. Pretože neviem, čo všetko používatelia potrebujú už veľa krát som prosil, aby mi poslali nápady, otázky, myšlienky... Stalo sa to výnimočne a preto Váš príspevok považujem za ďalší príspevok typu "výkrik do tmy". Ako programátor negenerujem potreby používateľov, ale sa ich snažím riešiť...
Jako výbornou tematickou pomůcku o čem psát, bych doporučil knihu "EXCEL VBA - Velká kniha řešení" od Moniky Weber a Melanie Brenden. Zatim jsem tam našel většinu věcí, které po mě v práci chtěli. Samozřejmě některá témata v knize jsou méně prakticky upotřebitelná, takže stačilo by je jen nakousnout a naopak ta témata, která jsou žádaná rozvést. V práci často řeším přenos dat mezi jednotlivými soubory, automatické načítaní, formulářové prvky...atd.
Ještě používám "EXCEL 2007 - Programování ve VBA", což ej také výborná kniha. Proč to ale zmiňuji. Kniha řešení je psána tematicky, proto není vhodná pro úplné začátečníky. Je zde stručně nadhozeno téma, pár příkladů kódu a to je vše. Na zkopírování a upravení ideální, ale kniha "EXCEL 2007" od J.Walkenbacha je vhodnější pro začátek, kdy nastiňuje struktura VBA, programovací techniky - Vše krůček po krůčku. Myslím si, že když vhodně zkombinujete tyto dvě knihy bude váš seriál super. Vše smaozřejmě v StarBasicu nebo co to OO používá.
Chcel by som len podotknúť, že tento seriál nie je o makrách a nemá za úlohu naučiť čitateľa programovať makrá. Konkrétne táto časť má ukázať ako si už hotové makrá vložiť tam kam treba a možno ich trošku upraviť.
Ďakujem za radu, ale VBA nepoznám, MS Office nevlastním a preto si nemôžem ani odskúšať tieto veci. Pretože som invalidný dôchodca, sú to pre mňa vyhodené peniaze, ak by som si takú knihu kupoval. Preto potrebujem konkrétne zadania, na ktoré môžem urobiť návody a makrá.
Pekný deň prajem.
Takže ja by som mal jednu prosbu ak môžem. Na www.inet.sk sú nejaké makrá, ale žiaľ nedokážem si ich celkom prispôsobiť k svojim potrebám. Jedná sa mi napríklad o prevod čísla na text. Vôbec to makro nedokážem donútiť aby mi naslo to číslo čo potrebujem previesť na konkrétnom mieste v programe writer. Ešte poviem, že by som to rád použil na príjmový a výdavkový doklad čo vlastne vôbec nie je ďaleko od Vášho pôvodného článku.
Môžete mi napísať na mail pastierik at inet.sk? Nerozumiem celkom Vašej otázke, ako hľadáte číslo? Popis možností, ako makro s číslom pracuje nájdete tu: http://www.602office.cz/vkladanie_cisiel_slovom
Zdrojový údaj v Euro máte v tabuľke7 v bunke A2, sumu slovom ukladáte v tabuľke 8 do bunky B1. Detto platí pre druhú časť dokumentu, kde je však tabuľka 5 a tabuľka 6. Názov tabuľky zistíte v jej vlastnostiach. Budem predpokladať, že makrá pre vlastný prevod čísla na text (osobitne celej a desatinnej časti) máte urobené. Potom funkcia, ktorá vám vloží sumu slovom môže vyzerať takto:
Sub Suma_Slovom
dim dokument,tabulka,bunka as object
dokument=StarDesktop.CurrentComponent.GetTextTables()
' Výber tabuľky s číselným údajom podľa jej názvu
tabulka=dokument.GetByName("Tabuľka7")
' Výber hodnoty z bunky A2
bunka=tabulka.getCellByName("A2")
' Prevod na text - tieto funkcie treba naprogramovať
euro=preved_celu_cast(bunka.String)
centy=prebed_desatinnu_cast(bunka.string)
' Výber tabuľky, kde sa ukladá suma slovom podľa jej názvu
tabulka=dokument.GetByName("Tabuľka8")
' Výber bunky, kde sa ukladá suma slovom
bunka=tabulka.getCellByName("B1")
' Vloženie sumy slovom
bunka.string=euro+" Eur "+centy+" Euro centov"
' Opakovať pre zdrojovú tabuľku Tabuľka5 a uložiť výsledok do Tabuľka6
End Sub
