lulufraise
Messages postés14Date d'inscriptionjeudi 26 juin 2008StatutMembreDernière intervention27 juin 2008
-
27 juin 2008 à 11:58
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
27 juin 2008 à 16:03
Je souhaite rajouter un bouton click, pour imprimer le fichier PDF que j'ai ouvert avec une macro précedente.
Je voudrais aussi que cette impression ne soit pas faite sur l'imprimante par défaut mais sur une autre et c'est ça que je ne sait pas faire.
Quelqu'un pourai m'aider?Merci
ci joint un bout de mon code pour bien comprendre ma démarche:
Sub MacrTest()
Dim reponse As String
reponse = InputBox("Numéro d'identification", "Saisir le numéro")
If reponse = "" Then
Call MsgBox("aucun numéro n'a été entré", , "Erreur")
ElseIf reponse = "01055329" Then
Dim FichierOuvPDF()
Shell "cmd /c start acrord32.exe ""D:\Data\fourlud\My Documents\notices\2553.840_11_10.pdf"""
ElseIf reponse = "01055330" Then
Dim FichierOuvPDF2()
Shell "cmd /c start acrord32.exe ""D:\Data\fourlud\My Documents\notices\2553.804_11_28.pdf"""
lulufraise
Messages postés14Date d'inscriptionjeudi 26 juin 2008StatutMembreDernière intervention27 juin 2008 27 juin 2008 à 13:09
Pourrais tu m'expliquai la démarche du ShellExecute (APl) je lai deja vu dans les forum mais je débute en VBA (1 semaine) et je comprend pas ce que je dois mettre.Et pour le print aussi
Merci beaucoup
lulufraise
Messages postés14Date d'inscriptionjeudi 26 juin 2008StatutMembreDernière intervention27 juin 2008 27 juin 2008 à 14:35
dans la parenthèse de Printers j'ai mis le nom de l'imprimante mais j'ai encore un message d'erreur il me met : Sub ou fonction Sub non défini pour Printers