bonjour,

je fait appel a vous, pour vous demander votre aide. j'essaye de faire un pdf mais je veux automatiser sur un fichier excel. j'ai réussi a fair qui soit en pdf mais le hic ses qu'il faut rentrer le nom manuellement. j'aimerais sa savoir comment je pourrais faire pour mettre le nom automatiquement. pour l'instemps j'ai fait mon code en vba. svp aider moi

merci d'avance

salut,

la version de excel je vais t'en reparler mardi prochain car la je suis pas a ma job. mais j'utilise acrobat pour le mettre en pdf. pis le code vba se du vb mais adapter pour la suite office.

Salut,

voici ma version d 'excel. Microsoft Office Excel 2003(11.8169.8172) SP3

STP peut tu m'aider

Salut,

j'ai trouver une solution pour mon probleme. finalement se que je fait ses que j'enregistre le fivhier en .xls puis ensuite je l'imprime en pdf. mais acause de sa j'ai le fichier en double. donc je cherche un moyen pour le supprimer a l'aide de la meme macro. donc ma question est: ses quoi la commande pour suprimer un fichier.

merci de votre aide d'avance.

tryzec a écrit :

Salut,

j'ai trouver une solution pour mon probleme. finalement se que je fait ses que j'enregistre le fivhier en .xls puis ensuite je l'imprime en pdf. mais acause de sa j'ai le fichier en double. donc je cherche un moyen pour le supprimer a l'aide de la meme macro. donc ma question est: ses quoi la commande pour suprimer un fichier.

merci de votre aide d'avance.

Salut

faut être prudent quand on fait joujou avec ce genre de commande.

la commande en question est :

VBA
kill nom_du_fichier

si tu veux mettre ton code ici, je te pondrai une commande "sûre"...

lol merci

mais je me suis rendu conte que se que j'allais faire sa ne fonctionnerais pas merci quand meme.

Salut,

j'ai une question pour vous. j'ai trouver le code pour imprimer en pdf. sauf que le hick, il m'apparait un message d'erreur. sa m'apparait:

Lorsque vous créez un fichier PostScript, vous devez envoyer les polices hôte. Ouvrez les propriétés de l'imprimante, page options adobe pdf et DÉSACTIVEZ l'option. Ne pas envoyer les polices à distiller.

Donc je me demandais pk il m'apparait se message quand s'execute ma macro. Pour vous aider a comprende voici mon code:

Sheets("Feuil2").Select
ActiveSheet.PrintOut copies:=1, Preview:=False, _
ActivePrinter:="Adobe PDF", PrintToFile:=True, _
Collate:=True, prtofilename:=True

Merci de votre aide

je répond à la prmeière question, si c'est toujours d'actualité, parceque la suite ça permet de faire différemment mais je ne suis pas sur que ce soit ça au final

si tu as ton PDF d'ouvert sur le coté et que t'es sur excel tu met dans une macro que tu appelles:

AppActivate "mon fichier ouvert.pdf" 'met le focus sur ton document pdf ouvert

SendKeys "met le nom automatiquement", True
SendKeys "{TAB}", True 'passe à la rubrique suivante

....

comme ça t'es toujours sur ton pdf mais tu simule des appuies de touches pour remplir ton document automatiquement

tu peux meme mettre sur la Feuil1 en A1 : ' mon fichier ouvert.pdf '

et dans ta macro dire : cherchprog = Worksheets("Feuil").Range("A1") 'va chercher nom du programme
AppActivate cherchprog ' Active l'application appelé.

ps: si ton fichier pdf n'est pas encore ouvert utilise :

ReturnValue = Shell("chemin/nom repertoires/fichier.exe de adobe acrobat reader", 1) ' Exécute l'application appelé