Salut,
voilà ma question: comment convertir une feuille dans le classeur actif sans faire intervenir l'utilisateur?voila mon code:
Const ThePath As String = "C:\Documents and Settings\sheng\Desktop"
Const TheFile As String = "\testpdf.PDF"
Sub Imprimer()
Dim MonImprimanteParDéfaut
Sheets("Nom de la feuille" ).Select
SendKeys ThePath & TheFile + "~"
SendKeys ("{ENTER}" )
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Adobe PDF", Collate:=True
SendKeys ("{ENTER}" )
End Sub
ce code convertit bien la feuille sous pdf par contre l'utilisateur doit entrer un nom pour sauvegarder et cliker sur enregistrer.Je voudrais donc savoir comment sauter cette étape en nommant par exemple le fichier pdf testpdf
