如何删除 LibreOffice Writer 文档中的所有图像？

Question 1

您还可以使用 LibreOffice 中的短宏来删除文档中的所有图像：

Sub RemoveImages

   Dim oDoc as Object
   oDoc = ThisComponent

   Dim oGraphics as Object
   oGraphics = oDoc.getGraphicObjects()

   Dim oImg as Object

   For Each oImg in oGraphics
       oDoc.getText().removeTextContent(oImg)
   Next 

End Sub

此示例还可以修改为改变图像的属性（例如使它们全部具有统一的大小）以及处理形状对象等。

创建宏

LibreOffice 提供了 Basic 语言以及 IDE 来创建、调试、存储和运行代码。

要打开宏对话框，请使用Alt+F11或从菜单中工具>宏>组织宏>LibreOffice 基础版

代码位于模块，分为库。您可以创建自己的，但对于大多数用途，您可以使用内置的我的宏库和内置模块1。

打开宏对话框后，突出显示模块1并按编辑. 这将打开 IDE。

代码分为 Subs 和 Functions。借用 VBA，Functions 用于返回值，而 Subs 不返回值。您可以在 Main 下方的任何位置定义自己的 subs 和 function。因此，要使用此代码删除图像，只需将其粘贴到模块中即可。

使用宏

您可以直接从 IDE 运行代码，方法是单击要运行的 Sub 中的任意位置并按F5。（函数会返回值，因此需要从 Sub 中调用。）您还可以使用对话框按钮或菜单来运行代码。IDE 包含一个集成调试器，这在编写新代码时至关重要。

下次打开宏对话框时，您将看到子宏被列为宏，然后无需打开 IDE 即可运行。还可以将单个宏分配给菜单或工具栏项。

笔记：此宏将在活动文档上运行。从菜单或宏对话框运行宏时，可以假定这是您刚刚按下按钮的文档；但是当使用 IDE 创建、运行或调试代码时，请确保您没有将另一个文档设为活动文档。

LibreOffice 基础版

LibreOffice Basic 与 VBA 非常相似，但这种相似性也可能具有欺骗性，因为对象模型完全不同并且语法也存在许多差异。

例如，在 VBA 中，一旦您引用了图像对象，该图像对象就会有一个删除方法。在这里，对象具有或继承的方法很少。要删除图像对象，您可以使用结构和语法与基于浏览器的 DOM 非常相似的文档元素。

LibreOffice 帮助中包含 LibreOffice Basic 入门链接。

Answer