macro ne fonctionne pas Résolu/Fermé

Question

Bonjour, 

Je ne connais rien à libreoffice openoffice mais je dois m'y mettre (sur libreoffice) et je dois notamment faire des macros (je suis un utilisateur modeste d'excel VBA).

j'ai regardé sur net, j'ai copié stricto sensus un code libreoffice sensé marcher mais ça ne marche pas chez moi (libreoffice Version: 6.2.8.2 (x64), windows 10). je cherche mais je ne trouve pas alors je ne suis décidé a venir demander de l'aide, d'avance merci !

j'ai l'impression qu'il me manque des extensions ou je ne sais quoi pour que ça marche (pour faire marcher les lignes de type com.sun.star....?) , voici le code copié et qui me renvoi erreur 423  (sur la ligne : dimensionsForme.Widht = 2600) quand je exécute :

public Sub test01

Dim monDoc As Object
Dim lesFeuilles As Object
Dim maFeuille As Object
Dim maPage As Object
Dim maForme As Object
Dim dimensionsForme As New com.sun.star.awt.Size
Dim positionForme As New com.sun.star.awt.Point
 
monDoc = ThisComponent
lesFeuilles = monDoc.Sheets
maFeuille = lesFeuilles.getByName("tableau_bord")
maPage = mafeuille.DrawPage

dimensionsForme.Widht = 2600
dimensionsForme.Height = 1200
positionForme.x = 3500
positionForme.y = 3500

maForme = monDoc.createInstance("com.sun.star.drawing.EllipseShape")
maForme.Size = dimensionForme
maPage.add(maForme)
maForme.Position = positionForme

end sub


merci d'avance

Configuration: Windows / Chrome 83.0.4103.106

OOoForum · Accepted Answer

Pour ton info, la macro fonctionne.
Il faut juste être un peu plus rigoureux quant à la rédaction des variables.

pijaku · Answer

Bonjour,

Essaye l'exemple page 80 de ce document : https://jazz.ensil.unilim.fr/outils_info/OOo_API_intro-04.pdf

Damien007 · Answer

tien après avoir installé open office et réouvert libreoffice, j'ai ce message à l'ouverture de libreoffice :

"libreoffice nécessite un environnement d'exécution java (JRE) 64-bit pour réaliser cette tâche. Veuillez installer un JRE puis redémarrer LibreOffice"

c'est surement ça le pb, ceci dit j'ai souvenir d'avoir vu ce message et d'avoir fait ce qui était demandé, je vais refaire et voir si le problème persiste.

EDIT : Bon j'ai réinstallé JRE, en faisant attention de choisir 64bit (j'avais surement fait 32bit qui est par défaut la première fois), je n'ai plus le message d'erreur mais par contre mes macros continuent de ne pas fonctionner

OOoForum · Answer

"Ne pas fonctionner" n'aidera pas ceux qui tentent de vous aider.
Il faut fournir un document intégrant la macro.


Et le plus simple est de vous adresser sur un forum spécialisé en programmation :
https://forum.openoffice.org/fr/forum/forum24-programmation-macro-basic.html


.

dubcek · Answer

hello
vérifier  Outils -> Options -> Libreoffice -> Sécurité -> Sécurité des macros

yclik · Answer

Bonjour

remplacer : dimensionsForme.Widht = 2600
par : 
dimensionsForme.Width = 2600

remplacer : maForme.Size = dimensionForm
par 
maForme.Size = dimensionsForme

Macro ne fonctionne pas

6 réponses

Discussions similaires