Access impression automatique en PDF

Fermé
34jrmy Messages postés 7 Date d'inscription dimanche 3 juin 2012 Statut Membre Dernière intervention 31 août 2012 - 31 août 2012 à 19:26
f894009 Messages postés 17210 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 23 décembre 2024 - 3 sept. 2012 à 09:39
Bonjour,

J'ai pu voir sur plusieurs forum qu'il était possible de directement imprimer en PDF un etat sur access.

Je suis fortement interresse.

J'ai notamment pu sortir ce genre de code:


Malheureusement étant novice je ne sais pas où l'encoder, mon but étant de créer un bouton qui après click me permettrait de lancer directement l'impression PDF via pdf créator si besoin


Merci à vous!!
A voir également:

1 réponse

f894009 Messages postés 17210 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 23 décembre 2024 1 711
Modifié par f894009 le 3/09/2012 à 09:41
Bonjour,

Ce petit morceau de code marche a merveille.

Nom du bouton a modifier

Private Sub Commande3_Click() 
   
  'obelix199 replied on 16-Mar-09 01:04 PM 
  ' Change l'imprimante par defaut 
  ' ------------------------------ 
  ' 
  NomImprimanteApres = "PdfCreator" 
  Shell ("c:\windows\system32\rundll32 printui.dll,PrintUIEntry /y /n " + Chr(34) + NomImprimanteApres + Chr(34)) 

  'Impression de l'etat: changez le nom 
  DoCmd.OpenReport "TCom", acViewNormal 

  ' Remet l'imprimante par defaut, voir dans Imprimantes et telecopieurs 
  ' ----------------------------- 
  NomImprimanteAvant = "Nom de l'imprimante normale" 
  Shell ("c:\windows\system32\rundll32 printui.dll,PrintUIEntry /y /n " + Chr(34) + NomImprimanteAvant + Chr(34)) 

End Sub 


Bonne suite
0