<?xml version="1.0" encoding="UTF-8" ?>
<?xml-stylesheet href="rss.css" type="text/css"?>
<rss version="2.0" xmlns:content="http://purl.org/rss/1.0/modules/content/">
<channel>
<title>OpenOffice.cz - Komentáře ke článkům</title>
<link>http://www.openoffice.cz/diskuse/diskuze-ke-clankum</link>
<description>Oficiální portál pro uživatele OpenOffice.org</description>
<copyright>Copyright © 2024 CCB spol. s r.o.</copyright>
<managingEditor>webmaster@ccb.cz (OpenOffice.cz)</managingEditor>
<webMaster>webmaster@ccb.cz (OpenOffice.cz)</webMaster>
<generator>XOOPS 2.2.4 / RSSFit 1.52</generator>
<docs>http://blogs.law.harvard.edu/tech/rss</docs>
<language>cs</language>
<lastBuildDate>Fri, 22 May 2026 03:34:09 +0200</lastBuildDate>
<item>
<title>Re:Cykly v makrech</title>
<description><![CDATA[Neaktualizovani ste premennú Selection, zápis nezodpovedá makrám v OpenOffice. Toto funguje:
dim vyber, bunka, document, dispatcher as object
vyber=ThisComponent.getCurrentSelection()
bunka=vyber.getCellByPosition(0,0)
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "By"
args1(0).Value = 1
args1(1).Name = "Sel"
args1(1).Value = false
Do Until bunka.getstring()=""
dispatcher.executeDispatch(document, ".uno:GoDown", "", 0, args1())
vyber=ThisComponent.getCurrentSelection()
bunka=vyber.getCellByPosition(0,0)
Loop]]></description>
<pubDate>Tue, 24 Mar 2015 19:13:10 +0100</pubDate>
<link>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8070</link>
<guid>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8070</guid>
</item>
<item>
<title>Cykly v makrech</title>
<description><![CDATA[Dobrý den
tady je ten můj problém.
Do Until Selection = ""
Select Case Selection
End Select
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "By"
args2(0).Value = 1
args2(1).Name = "Sel"
args2(1).Value = false
dispatcher.executeDispatch(document, ".uno:GoDown", "", 0, args2())
Loop
Ve ¨VBA to fungovalo dobře ale v LibreOffice to nefunguje.
Teprve začínam s Libre Office.
Děkuji Franta]]></description>
<pubDate>Thu, 19 Mar 2015 12:22:48 +0100</pubDate>
<link>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8065</link>
<guid>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8065</guid>
</item>
<item>
<title>Cykly v makrech</title>
<description><![CDATA[Je to jasné.
Není splněna podmínka ukončení cyklu. Opravte ji a bude to fungovat.]]></description>
<pubDate>Sun, 15 Mar 2015 23:53:07 +0100</pubDate>
<link>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8060</link>
<guid>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8060</guid>
</item>
<item>
<title>Cykly v makrech</title>
<description><![CDATA[Musíte ukázať, ako to máte naprogramované, z krištáľovej gule sa ťažko veští príčina…]]></description>
<pubDate>Sun, 15 Mar 2015 19:57:30 +0100</pubDate>
<link>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8059</link>
<guid>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8059</guid>
</item>
<item>
<title>Cykly v makrech</title>
<description><![CDATA[Dobrý den
Mám takový problém že příkaz Do until ""  ....Loop v libreOffice nefunguje.
Cyklus se má ukončit jakmile skočí na prázdnou buňku ale neukončí cyklus.
Vlastně dojde k zacyklení.
netuším čím to je?
předem děkuji za radu Franta]]></description>
<pubDate>Sat, 14 Mar 2015 18:04:54 +0100</pubDate>
<link>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8058</link>
<guid>https://www.openoffice.cz/diskuse/diskuze-ke-clankum/cykly-v-makrech#post8058</guid>
</item>
</channel>
</rss>