Bonjour. Si tu affiches l'historique de la page du Wiki, tu verras que le texte de la Macro date un peu. Rien d'étonnant à ce qu'il y aie aujourd'hui une erreur d'objet. Les codes des Macros les plus à jour sont ceux du forum.
Jean-Michel PIERRE Tél : 06.19.55.73.22 > Le 17 déc. 2017 à 14:45, Bernard Siaud alias Troumad <li...@siaud.org> a > écrit : > > > Bonjour > > En partant de la doc de LibreOffice ( > https://wiki.documentfoundation.org/Documentation/BASIC_Guide/fr ) , on est > renvoyé sur la doc de AOO. > J'arrive ici : > https://wiki.openoffice.org/wiki/FR/Documentation/BASIC_Guide/Structure_of_Text_Documents > Et je teste le premier programme : > >> REM ***** BASIC ***** >> >> >> sub Main >> >> Dim Doc As Object >> Dim Enum As Object >> Dim TextElement As Object >> >> ' Create document object >> Doc = StarDesktop.CurrentComponent >> ' Create enumeration object >> Enum = Doc.Text.createEnumeration >> ' loop over all text elements >> >> While Enum.hasMoreElements >> TextElement = Enum.nextElement >> >> If TextElement.supportsService("com.sun.star.text.TextTable") Then >> MsgBox "The current block contains a table." >> End If >> >> If TextElement.supportsService("com.sun.star.text.Paragraph") Then >> MsgBox "The current block contains a paragraph." >> End If >> >> Wend >> >> >> end sub > > Et ça ne marche pas : >> Erreur d'exécution BASIC. >> Propriété ou méthode non trouvée : Text. > Doc.Text est inconnu :( > -- > Amicalement vOOotre Troumad Alias Bernard SIAUD > mon site : http://troumad.org : AD&D maths WEB... > Pour la liberté http://www.developpez.net/forums/f17/systemes/linux/ > N'envoyez que des documents avec des formats ouverts, comme > http://fr.libreoffice.org > > -- > Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire > Les archives de la liste sont disponibles à > https://listarchives.libreoffice.org/fr/users/ > Tous les messages envoyés sur cette liste seront archivés publiquement et ne > pourront pas être supprimés > -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être supprimés
