Bonjour,
Malgré des recherches sur le forum, je ne trouve pas a solution à mon problème.
Je travail depuis une macro d'un fichier excel 2003 qui ouvre un fichier PDF, l'imprime et revient sur le fichier excel en cours.
Cependant, il ne ferme pas adobe reader 9 et laisse la fenêtre ouverte.
Ci-joint le code ou il manque incontestablement la ligne de commande qui devrait fermer adobe reader 9.

D'avance, je vous remercie.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub fax()
Dim oApp As Object
Dim num, cimp
Range("N2").Select
num = ActiveCell
cimp = Range("Q" & num).Value
Dim NomFichier As String
Dim x As Long
x = FindWindow("XLMAIN", Application.Caption)
NomFichier = cimp
ShellExecute x, "print", NomFichier, "", "", 1
End Sub

Cordialement.