HELP

bonjour,
j'ai un fichier xls !
J'aimerai le transformer en pdf.

Je trouve rien de bien conclant
quelqu'un me me filer un coup de pouce ?

Bonjour,

Vous pouvez utiliser PDFCreator qui est un programme à installer que vous pouvez télécharger Télécharger.com

cela installe une imprimante virtuelle qui permet de créer des fichiers pdf à partir de ce type d'impression.

Cordialement

merci pour t'as réponse :D
j'ai déja une imprimante virtuel que m'imprime mon document excel en pdf sur mon bureau ...

mais je sais pas trop si il faut faire de la macro dans windev genre
MaFeuilleXLS>>activeworkbook>>print(toto)
(mais comment définir l'imprimante ??)

ou

directement dans l'applis ( a condition que tout les utilisateurs est l'imprimante !)
LanceAppliAssociée("C:\Program Files\PDF Create! 3\bin\CreatePDF.exe -NOSTART -PF test.xls")
qui ne marche pas d'ailleurs !

?????

Bonjour,

(mais comment définir l'imprimante ??)
ici oExcel est une instante d'Excel


Le nom de l'imprimante par défaut peut être récupérer via la commande :


Changer votre imprimante par défaut puis tester le code pour récupérer le nom de l'imprimante.

Cordialement

mmm, t'es sur ??!

Erreur à la ligne 21 du traitement Clic sur Bouton3.
Vous accédez au membre Automation ActivePrinter.
Erreur 800A03EC : Impossible de définir la propriété ActivePrinter de la classe Application.
Erreur 80020005, Type incorrect pour le paramètre 1

voici mon code

MaFeuilleXLS est un objet Automation dynamique
FichierXLS est une chaîne = fRepExe() + "c:\test.xls"



SI ObjetActif("Excel.Application") <> Null ALORS
// Récupération de l'instance de Excel existante
MaFeuilleXLS = ObjetActif("Excel.Application")
SINON
// Allocation de l'objet automation "MaFeuilleXLS"
MaFeuilleXLS = allouer un objet Automation "Excel.Application"
FIN


//erreur
MaFeuilleXLS>>ActivePrinter = "//anubis/IMP990460 sur Ne04:"

Info(MaFeuilleXLS>>ActivePrinter)


pfff

// Création d'un objet automation dynamique
MaFeuilleXLS est un objet Automation dynamique
FichierXLS est une chaîne = "c:\test.xls"


// Instance de Excel existante ?
SI ObjetActif("Excel.Application") <> Null ALORS
// Récupération de l'instance de Excel existante
MaFeuilleXLS = ObjetActif("Excel.Application")
SINON
// Allocation de l'objet automation "MaFeuilleXLS"
MaFeuilleXLS = allouer un objet Automation "Excel.Application"
FIN

// Excel n'st pas visible si vous voulez le rendre visible
// changez a valeur à vrai
MaFeuilleXLS>>Visible = Faux
// Ouverture d'un classeur d'Excel

//Info(MaFeuilleXLS>>ActivePrinter)
//MaFeuilleXLS>>Range("A1:P49")>>Select
MaFeuilleXLS>>ActivePrinter = "PDFCreator sur Ne01:" <-- ça plante a ce niveau là !

par contre Info(oExcel>>ActivePrinter)cela fonctionne
et donc je suis sur de "PDFCreator sur Ne01:"

Bonjour,

Il suffit tout simplement d'ouvrir une feuille avant d'affecter l'imprimante

Ce code à été testé

voila, j'ai galéré a imprimer le document ....
mais voila la réponse ( pour la communauté


MaFeuilleXLS est un objet Automation dynamique
sFichierXLS est une chaîne = "c:\test.xls"


// Instance de Excel existante ?
SI ObjetActif("Excel.Application") <> Null ALORS
// Récupération de l'instance de Excel existante
MaFeuilleXLS = ObjetActif("Excel.Application")
SINON
// Allocation de l'objet automation "MaFeuilleXLS"
MaFeuilleXLS = allouer un objet Automation "Excel.Application"
FIN

// Excel n'st pas visible si vous voulez le rendre visible
// changez a valeur à vrai
MaFeuilleXLS>>Visible = Faux
MaFeuilleXLS>>Workbooks>>Open( sFichierXLS ) //Ici on ouvre la feuille

// Ouverture d'un classeur d'Excel

//donne l'imprimante par défaut
Info( MaFeuilleXLS>>ActivePrinter)
//sélectionne l'imprimante "pdf créator"
MaFeuilleXLS>>ActivePrinter = "PDFCreator sur Ne01:"
//info sur l'imprimante
Info(MaFeuilleXLS>>ActivePrinter)

//imprime le document en pdf
MaFeuilleXLS>>ActiveWindow>>SelectedSheets>>PrintOut(1)

//bien penser a configurer les options de PDF créator pour que cela s'enregistre automatiquement avec le nom du document

enfin, gros merci