La macro ne s’exécute que dans un seul et même fichier writer.
Quand j’ai besoin d’un nouveau fichier, je copie un ancien, efface ce qui ne me va pas, etc.
Bonsoir,
Relis mon message : bibliothèque Standard de Mes macros pas celle du document !
A plus,
La macro est et était dans :
Mes macros et boîtes de dialogue
Standard
Module1
Toujours le même problème : macro ne fonctionne que dans un seul fichier ?
Bonsoir,
Comment est lancée la macro ?
A plus,
JM
Merci pour m’avoir répondu.
La macro est lancée avec une touche de fonction.
Comme je disais, elle fonctionne très bien mais dans un seul fichier.
Si je crée un nouveau fichier, la macro “est bien là” mais ne fonctionne pas !!!
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
Je n’ai pas réussi à faire fonctionner la macro.
Même en pas à pas, il ne se passe rien…
Le paramètre BackGraphicURL refuse de se remplir…
Incompréhensible.
Cela fait des “années” finalement que j’ai posé la question du fonctionnement des macros.
Vous l’avez trouvée sur le site des questions LibreOffice je suppose.
Je vous transmets un fichier sans entête et un avec entête.
Je transmets aussi un fichier de l’entête et un fichier vide.
Seulement, il faut modifier la macro et donc inclure l’adresse de ces deux derniers fichiers.
Poour activer la macro j’utilise une touche Ctrl + 9, par exemple.
Et pour cela, il faut aller dans Outils puis Personnaliser
Comme j’ai dit plusieurs fois, cela fonctionne très bien mais dans un seul fichier et donc, pour pouvoir m’en servir dans un autre fichier, je fait un CopierColler et modifie le contenu.
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
9309 Vide…odt (49.6 KB)
9309 Vide…pdf (162 KB)
L’ODT fourni ne contient aucune macro.
Désolé, Les macros sont dans LO et non pas dans un fichier.
Envoi de la macro.
Merci.
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
LO Macro.odt (28.7 KB)
Bonjour,
Tu devrais vite anonymiser tes documents en ligne.
Avec ton IBAN, téléphone et adresse visibles du monde entier, tu peux être la cible de pirates informatiques…
Je te réponds sur le forum, et je pose la question sur un forum anglophone, si tu me donnes l’autorisation.
A bientôt
Pas de problème.
Par contre, je ne sais pas comment arriver directement sur le forum.
Pour les documents, c’est trop tard mais je me demande ce qu’un pirate peut faire : se faire passer par l’entreprise mais cela ne devrait pas marcher bien longtemps il me semble.
Merci.
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
Bonsoir,
J’ai le même problème que toi. Ca fonctionne avec ton document, pas avec un nouveau.
Avec un affichage de message dans la macro, je vois qu’elle est bien exécutée (on passe dedans) mais la valeur de BackGraphicURL n’est pas prise en compte.
Après quelques recherches, ça fonctionne avec OpenOffice, il y a donc quelque chose de sournois avec Libo.
La solution que j’ai trouvée :
- créer un document “vierge” (à partir de celui qui fonctionne).
- L’enregistrer comme modèle (Fichier>Enregistrer sous> Modèle de document) Dans le dossier des modèles (défini dans les options)
Pour créer un nouveau document, utiliser le modèle : Fichier>Nouveau>Modèles et choisir ce modèle
La macro fonctionne sur ce document que tu peux enregistrer ensuite.
Je vais présenter le problème sur le forum OpenOffice/LibreOffice et sur la version anglophone, si tu en es d’accord. Avec ton fichier anonymisé.
PS : tu peux supprimer ton fichier et en mettre un autre en éditant le message qui le contient…
A plus
JM
Bonjour,
PS : tu peux supprimer ton fichier et en mettre un autre en éditant le message qui le contient…
A plus
JM
Je ne comprends ce que cela veux dire, que dois-je faire ?
Merci.
Ensuite, on dirait bien qu’il y a un bug dans LO, en effet !
Merci encore.
C. Allais
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
Salut,
Quel âne je suis !!!
Ta macro fonctionne sur n’importe quel fichier.
Il suffit d’ affecter à la première page le style “Première page” 
en choisissant le style dans la panneau de droite.
Sans ça, le style est bien modifié, mais pas affiché, puisque la page n’a pas ce style…
Donc il suffit d’avoir un modèle par défaut (vide ou non), dont la première page ait le bon style…
Ça peut être le style “Première Page” ou un autre (personnalisé), il suffira de modifier son nom dans la macro.
A plus,
Je cherche maintenant à affecter un style à une page par macro.
Bonjour,
Je n’aime pas qu’un truc me résiste…
Pour en finir avec ce sujet, quelques lignes à rajouter en début de macro :
oCurseur = Doc.CurrentController.ViewCursor ' Créer un curseur dans le texte
oCurseur.JumpToPage(1) ' Aller à la première page
oCurseur.PageDescName = "Première page" ' Affecter le style à la page
La macro fonctionne ensuite sur n’importe quel fichier.
Cordialement,
Bravo.
Je n’y croyais presque plus.
Il y a des personnes qui ne savent pas lire.
C’est comme un problème de math, il faut lire et relire l’énoncé afin de répondre à la question et non à côté, comme j’ai pu voir.
Pour le “Style”: je crois savoir, comprendre ce qu’il y a dedans mais ne sait pas m’en servir.
Merci, c’est parfait maintenant.
Il va falloir que je retrouve le questionnaire LO afin de dire que c’est résolu.
Bravo.
C. Allais
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
Bonjour,
Il reste un problème : “Variable non définie”.
Ce doit être “oCurseur” ?
Merci.
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse
Oui, bien sûr !
Il faut déclarer la variable au préalable avec les autres.
Dim oCurseur as Object
Cordialement,
JM
Désolé, encore et toujours le même problème :
oCurseur = Doc.CurrentController.ViewCursor ’ Créer un curseur dans le texte
Le retour est encore : “Variable Objet non définie”
alors qu’elle est inscrite ?
Merci.
Je ne sais pas s’il y a un document qui explique clairement le fonctionnement de LO.
J’avais cherché, il y a longtemps.
Il avait fallut que je retrouve la (les) notice(s) d’origine de “StarOffice” afin d’avoir quelque chose de clair.
Bonne journée.
C. Allais
Allais Entreprise
Chauffage Sanitaire Climatisation
14 rue Job 31000 Toulouse