bonjour,

je suis en train de faire une macro sur excel a l'aide de vba. elle consiste a imprimer une feuille d'un fichier xls. j'ai trouver le moyen d'imprimer un fichier xls au complet mais pas juste une feuille. pouvez-vous m'aider a trouver le moyen d'imprimer une feuille en pdf.

voici mon code pour vous aider:

Sub Impression()
'
' Impression Macro
' Macro enregistrée le 12-03-2008 par uni$jti
'
Dim PSName As String
Dim PDFName As String
Dim myPDF As PdfDistiller
PSName = "c:\test1.ps"
PDFName = "c:\test2.pdf"
Set myPDF = New PdfDistiller

Dim Mysheet As Worksheet
Set Mysheet = ActiveSheet
ActiveWindow.SelectedSheets.PrintOut copies:=1, preview:=False, _
ActivePrinter:="Adobe pdf sur Ne03:", PrintToFile:=True, Collate:=True, _
PrToFileName:=PSName

myPDF.FileToPDF PSName, PDFName, ""
Set myPDF = Nothing
End Sub

merci d'avance pour votre aide.