Accueil - Visual Basic

Tout afficher

LibreOffice - Supprimer toutes les images d'un document

Wakonda - LibreOffice, Visual Basic Posté le 29 décembre 2022

Pour supprimer toutes les images d'un document, on pourra utiliser la macro suivante :

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

Cette macro est à lancer directement depuis LibreOffice (Outils -> Macros -> Gérer les macros -> LibreOffice Basic ...)

Lire ...

Rechercher

Tags

Publicité

Suivez-nous

Aidez-nous !

Admin