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

petouf

Člen

Registrace: 6. 11. 2019

Příspěvků: 8

Vložení vzorce do buňky pomocí makra

Ahoj,
neví prosím někdo, jak pomocí makra vložit vzorec do buňky? Zkoušel jsem Bunka.string = "=A1+B1", ale to se v buňce zobrazí samozřejmě jen jako řetězec. Zajímala by mě "finta" jak tam dostat přémo vzorec (případně celou funkci, původně jsem tam chtěl dostat funkci COUNTIF)
Druhá věc, na kterou jsem narazil je toto: Ve sloupci A1:A3 mám nějaké záznamy. Chci spočítat, kolik je jich stejných jako v buňce B1. Použiji na to funkci COUNTIF(A1:A3;B1) To funguje do té doby, dokud se v záznamu neobjeví znaménko "+", "*" a nebo závorka. Poté hledání selže.
Např.
     A        B
1 Petr   Petr
2 Petr
3 Pavel

funkce vrátí správně 2

Ale
        A                        B
1 (Petr + Jirka)    (Petr + Jirka)
2 Pavel
3 (Petr + Jirka)

mě funkce vrátí 0

Tak mě zajímá proč...
Díky za čas, přeji pěkný den!

neutr

Člen

Registrace: 8. 3. 2007

Příspěvků: 3,468

Re: Vložení vzorce do buňky pomocí makra

Vzory uvádím dále - existuje ještě podobná syntax ale výsledek stejný. Váš příklad je uveden přímo a náhodou úplně stejně s Vaším zadáním.

SUB deklaracebunky
 Dim Doc As Object
 Dim Sheet As Object
 Dim Cell As Object
 Doc = ThisComponent
 Sheet = Doc. Sheets ( 0 )
 Cell = Sheet. getCellByPosition ( 0 , 0 )
 Cell. Value = 100
 Cell = Sheet. getCellByPosition ( 0 , 1 )
 Cell. String = 1000
 Cell = Sheet. getCellByPosition ( 0 , 2 )
 Cell. Formula = "=A1+A2"
 MsgBox Cell. Value 
End SUB

---

Moje e-mailová adresa
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte orientaci při vyhledávání řešení JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

kamlan

Člen

Registrace: 15. 9. 2016

Příspěvků: 368

Re: Vložení vzorce do buňky pomocí makra

Druhý požadavek: Nástroje/ Možnosti/ LibreOffice Calc/ Výpočty -> vybrat: Vzorce bez zástupných znaků a regulárních výrazů

petouf

Člen

Registrace: 6. 11. 2019

Příspěvků: 8

Re: Vložení vzorce do buňky pomocí makra

Paráda, 1 odpověď 100procentní.
U druhé jsem drobet hledal, nemám tam " Vzorce bez zástupných znaků a regulárních výrazů " ale pomohlo zrušit zaškrtnutí "Povolit regulární výrazy ve vzorcích".
Myslím, že mám , co jsem potřeboval, díky moc :-)