Faq/Math/101

TDF LibreOffice Document Liberation Project Community Blogs Weblate Nextcloud Redmine Ask LibreOffice Donate

• Domů
• Vývoj
• Design
• QA
• Události
• Dokumentace
• Webové stránky
• Lokalizace
• Přístupnost
• Marketing
• Diverzita
• Nápověda

• Documentation Home
• Official Publications
• Other Resources
• FAQ
• HowTo
• Macros
• Docs Development

• FAQ Domů
• Obecné
• Writer
• Calc
• Impress
• Draw
• Math
• Base

Jak upravím šipky vektorů a úhlů, které jsou příliš krátké.

Kvůli chybě záznamu se mohou šipky vektorů nebo úhly zdát příliš krátké. Chcete-li to chcete opravit, vzorec musí být znovu editovaný a uzavřený. Musíte tedy na každý vzorce poklepat (tím jej začnete editovat) a hned editaci ukončit.

Pokud máte v dokumentu velké množství vzorců, bude tato práce brzy únavná. Následující makro celou práci udělá za vás:

Sub ReviseFormules
     dim i as integer
     dim TheObjets as Object
     dim Objet as Object
     TheObjets=ThisComponent.getEmbeddedObjects
     On error goto erreur
     for i=0 to TheObjets.count-1
         Objet=TheObjets(i)
         if Objet.getImplementationName="SwXTextEmbeddedObject" then
             if Objet.embeddedObject.component.getImplementationName="com.sun.star.comp.Math.FormulaDocument" then
                 Objet.embeddedObject.setmodified(true)
                 Objet.embeddedObject.update
             EndIf
         endif
     next i
     erreur:
     resume next
 end sub