Sub pdf_ogni_foglio()
Dim foglio As Worksheet
percorso = "C:\Users\lanfranco\Desktop"
For Each foglio In Worksheets
nomefoglio = foglio.Name
foglio.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=percorso & nomefoglio & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
Next
End Sub
questa è la macro, io dovrei portare tutti i pdf creati in una cartella creata in desktop, chiamiamola "prova", se inserisco dopo lo desktop, su percorso, \prova me li continua a salvare tutti in desktop sparsi e non nella cartella... dove sbaglio? (mai fatte macro)