Discussion :

[Maxime63]

Bonjour,

Je sollicite votre aide concernant ceci:

J'aimerai par l'intermédiaire d'un bouton sur une feuille de calcul, imprimer un fichier PDF (qui se trouve dans un répertoire spécifique) sur mon imprimante automatiquement.
Quel code dois-je attribuer à ce bouton pour effectuer cette procédure ?

Merci d'avance !

[kiki29]

Salut, tu as l'enregistreur de macros ou sinon qqch comme ceci à adapter et compléter si nécessaire ( timing, kill etc ).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Option Explicit
 
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal 
 
Sub Tst()
Dim hwnd As Long
Dim sFichier As String
    sFichier = ThisWorkbook.Path & "\" & "Test print.pdf"
    ShellExecute hwnd, "Print", sFichier, "", "", 1
End Sub

[Maxime63]

Hum non l'enregistreur de macros n'enregistre pas les actions effectuées hors d'Excel.

Concernant ton code, pourrait tu le détailler un peu. Je ne comprends pas comment il fonctionne.

Merci d'avance !