Bonjour à tous,
Grande débutante en VBA....: je rencontre une problématique pour réaliser un export pdf d'une feuille en boucle sur différents classeurs ouverts :
Mon code est le suivant :
Sub exportpdf()
Dim Cls As Integer
' pour passer au classeur suivant si A pas trouver
On Error Resume Next
For Cls = 1 To Windows.Application.Workbooks.Count
Nomfichier = Range("C8").Value & ".pdf"
Dossier = xxx
Chemin = Dossier & Nomfichier
Sheets("3-Fiche opération").ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Next Cls
End Sub
Il exporte bien un pdf avec le bon nom dans le bon dossier mais uniquement la feuille du classeur qui contient la macro, sans passer aux classeurs suivants.
Mille remerciements à celui ou celle qui pourra m'apporter son aide.
Cordialement,
Valérie