Les 2 références :
1) www.excel-downloads.com/html/French/forum/read.php?f=1&i=8235&t=8222>
2) www.excel-downloads.com/html/French/forum/messages/1_15499_15499.htm
Quand je vous lis ou vous écoute j’ai l’impression d’être à 20 milieux sous les mers tellement mon niveau est faible….
Pourtant je bricole pas mal de macros sur Excel d’officeXp Pro 2002 et Adobe acrobat 4 mais je suis de vous !
Alors si quelqu’1 pouvais m’aider à solutionner mon problème de façon plus didactique éviterai peut-être la noyade…
Voici ma macro telle qu’elle est :
Sub Imp_adobe()
Sheets("Controle").Select
Application.DisplayAlerts = False
' DateMois = Cells(3, 1)
' Année = Mid(DateMois, 7, 2)
' Année = 2000 + Année
' Mois = Mid(DateMois, 4, 2)
' DateMois = Mois & "_" & Année
' Chemin_Pdf = Cells(5, 3).Value: ' chemin du répertoire pour le fichier PDF
Sheets(Array("00", "01", "02", "03", "04", "05")).Select
Application.ActivePrinter = "Acrobat PDFWriter sur LPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Acrobat PDFWriter sur LPT1:", PrintToFile:=True
End Sub
Malheureusement le nom du fichier et le chemin d’impression ne servent jamais.
Au secours !!!!!!!!!!!!!!!!!!!!!!
MERCI.