[Résolu][Calc] export PDF, erreur d'exécution du Basic

Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.

Modérateur : Vilains modOOs

Règles du forum
:alerte: Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
jff
Fraîchement OOthentifié
Messages : 2
Inscription : 24 avr. 2023 19:56

[Résolu][Calc] export PDF, erreur d'exécution du Basic

Message par jff »


La modération vous a écrit: Ajout de la balise [Calc] et titre complété

Bonjour à tous,

J'essaie d'utiliser le modèle JustInvoice mais la génération du pdf ne fonctionne pas chez moi.
https://extensions.libreoffice.org/en/e ... generation
Voici le message d'erreur que je ne comprends pas:

Code : Tout sélectionner

Erreur d'exécution BASIC.
Une exception s'est produite : 
Type: com.sun.star.io.IOException
Message: SfxBaseModel::impl_store <file:///C:/Users/........./Factures clients/JustInvoice/PDFs/file:///C:/Users/...../Factures clients/JustInvoice/Invoices/IC-239-456.pdf> failed: 0x507(Error Area:Io Class:Access Code:7).
Et le code:

Code : Tout sélectionner

sub ExportToPDF()

 Dim filename, pdfFileName as String
 Dim savePDF as Boolean
 Dim res as Integer
 setGlobalVarsFromDataRanges()

 if not hasFilename() then exit sub

 filename = GetFileNameWithoutExtension(ThisComponent.getURL(), GetPathSeparator() )


 dim aMediaDescriptor(0) as new com.sun.star.beans.PropertyValue
 aMediaDescriptor(0).Name = "FilterName"
 aMediaDescriptor(0).Value = "calc_pdf_Export"



 pdfFileName = getPDFDir() + getPDFFileName()

 savePDF = true

 if FileExists(pdfFileName)  then 
	res = MsgBox( pdfFileName + Chr$(13) +"Press OK to OVERWRITE!! "+Chr$(13) + "Press CANCEL to not do anything ", 1, "PDF file already exists."

	if ( res = 2) then SavePDF = false
 end if


 if ( savePDF) then
 	ThisComponent.storeToURL(pdfFileName , aMediaDescriptor())
 	msgbox "Saved PDF to: "+ pdfFileName
 end if
end sub


Function getPDFFileName()
 Dim filename as String
 filename = GetFileNameWithoutExtension(ThisComponent.getURL(), GetPathSeparator() )
 getPDFFileName = filename + ".pdf"
end Function


Function getPDFDir()
	' note - setGlobalVarsFromDataRanges() assumed to already have been called in function calling this.
	getPDFDir =  gsBaseDir + "PDFs/"
end Function
Auriez-vous un conseil à me donner pour trouver le problème?

Merci d 'avance
LibreOffice 7.4.6.2 (x64) sous Windows 7
Avatar de l’utilisateur
micmac
RespOOnsable forum
RespOOnsable forum
Messages : 9580
Inscription : 28 août 2010 08:45

Re: [Calc] macro export PDF, erreur d'exécution du Basic

Message par micmac »

Bonjour et bienvenue,

Cette section a des règles très précises que vous devez obligatoirement suivre pour obtenir de l'aide. C'est indiqué dans le cadre rouge en haut de la page.

Vous avez précisé qu'il s'agit de Calc mais il est demandé aux auteurs de faire précéder le titre de leur question d'une balise adéquate., [Calc] en l'occurrence.

N'oubliez pas que les termes Macro, OpenOffice ne doivent pas être employés car il sont implicites. Essayez de synthétiser au mieux ce que vous cherchez à faire.

Un titre accrocheur vous permettra d'une part d'être aidé plus rapidement et d'autre part, d'enrichir notre base de connaissances.

Nous l'avons fait pour vous cette fois-ci mais lors de votre prochaine question, nous vous remercions de le faire vous-même au risque de voir votre sujet verrouillé.
.
Dans votre signature il y a écrit : OpenOffice 7.4 sous Windows 7
OpenOffice 7.4 n'existe pas. Il s'agit de LibreOffice.

Dans votre signature il est nécessaire d'indiquer la version exacte de AOO ou LibO (AOO 4.1.14, LibO 7.4.6 par exemple).

Accès direct à votre signature pour la corriger.

Cordialement
Touche Ctrl de Windows = touche cmd⌘ sur Mac
Outils > Options sur Windows = OpenOffice > Préférences sur macOS
Avatar de l’utilisateur
Dude
IdOOle de la suite
IdOOle de la suite
Messages : 25602
Inscription : 03 mars 2006 07:45
Localisation : 127.0.0.1

Re: [Calc] export PDF, erreur d'exécution du Basic

Message par Dude »

Salut,
Dans le lien de la page donnée, il y a écrit :** Not tested on Windows and MacOS, nor am I sure of minimum compatible version. Feedback welcome. **
Or, le message d'erreur montre clairement que c'est un problème de chemin lié au système d'exploitation.

Fais remonter ça à l'auteur de ce modèle pour qu'il le corrige.
Ceci afin que cela profite à la Communauté.

A part ça, je ne vois pas l'intérêt d'utiliser un facturier en anglais et certainement non adapté aux conditions fiscales françaises.
Mieux vaut privilégier ce qu'on propose sur ce forum : viewforum.php?f=36

S'il s'agit d'exporter une feuille au format PDF, il y a cette extension à installer : viewtopic.php?t=32339
jff
Fraîchement OOthentifié
Messages : 2
Inscription : 24 avr. 2023 19:56

Re: [Calc] export PDF, erreur d'exécution du Basic

Message par jff »

Bonjour,

@micmac:
Toutes mes excuses pour le non respect des règles. Je n'ai pas pris le temps de les lire attentivement! :oops:
Sauf erreur de ma part, le contenu de la signature devait respecter un certain format lors de la création du compte. Il n'acceptait pas ce que je mettais C'est pour cette raison que j'ai copié un exemple. Je l'ai maintenant corrigé.

@Dude
Merci pour les 2 liens bien intéressants. Je vais faire qqs test...
Je vais quand même essayer de comprendre le problème, c'est un bon exercice :) J'ai une idée de où chercher maintenant.

Bien à vous
LibreOffice 7.4.6.2 (x64) sous Windows 7
Avatar de l’utilisateur
Dude
IdOOle de la suite
IdOOle de la suite
Messages : 25602
Inscription : 03 mars 2006 07:45
Localisation : 127.0.0.1

Re: [Calc] export PDF, erreur d'exécution du Basic

Message par Dude »

jff a écrit : 25 avr. 2023 20:06Je vais quand même essayer de comprendre le problème, c'est un bon exercice
Certes mais informer l'auteur du modèle me semble le minimum syndical.
A ce jour, je n'ai pas vu ton commentaire sur sa page. :roll:
Avatar de l’utilisateur
rollmops
PassiOOnné
PassiOOnné
Messages : 692
Inscription : 20 déc. 2017 14:45

Re: [Calc] export PDF, erreur d'exécution du Basic

Message par rollmops »

Bonjour,
jff a écrit : 24 avr. 2023 20:12<file:///C:/Users/........./Factures clients/JustInvoice/PDFs/file:///C:/Users/...../Factures clients/JustInvoice/Invoices/IC-239-456.pdf>
Je ne vois même pas comment cela pourrait marcher sous Linux. :lol:
Il y a deux fois "file:///" et donc un ConvertToUrl en trop au niveau du nom de fichier, ce qui occasionne l'erreur.
OpenOffice 4.1.15 - Windows 10
Avatar de l’utilisateur
Bidouille
RespOOnsable forum
RespOOnsable forum
Messages : 12457
Inscription : 08 nov. 2005 16:23
Localisation : Caen, France

Re: [Calc] export PDF, erreur d'exécution du Basic

Message par Bidouille »

Dernière visite : 25 avr. 2023 22:06
Je doute que l'auteur revienne un jour donner une suite.
Je clôture donc à sa place.

En cas d'erreur, veuillez lire ce sujet pour une éventuelle réouverture de votre question :
ftopic52748-reouverture-de-question-fermee.html