Imprimer un fichier [Résolu]

[Julien42]

Bonjour,

A nouveau je sollicite votre aide.
sur une requête je lance l'impression d'un état, rien de compliqué. A cet requête est lié le lien hypertexte d'un fichier pdf (il peut y en avoir plusieurs également).
Existe-t-il une solution pour lancer également l'impression de ce(s) fichier(s) pdf ?

Espérant que quelqu'un puisse m'aider... merci d'avance

[curt]

Bonjour Julien42,

une solution serait d'ouvrir Explorer dans un Formulaire (recherche Microsoft.web.browser), d'y ouvrir ton .pdf et.... de l'imprimer par exemple (tu pourrais aussi le télécharger !)

Curt

[Julien42]

c'est bon en cherchant sur le site j'ai trouvé :

Code :

1
2
3
4
5
6
7
8
9
10
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 nShowCmd As Long) As Long
 
Public Sub imprimer_fichier(Chemin As String, le_form As Form)
 
'imprimer le fichier dont le chemin est passé en paramètre
ShellExecute le_form.hwnd, "print", Chemin, "", "", 1
 
End Sub

puis

Code :

ShellExecute Me.hwnd, "print", "MonChamp", "", "", 1

ou alors

Code :

Call imprimer_fichier("Monchamp", Me)