Converter Excel em PDF através de VBScript

Para converter um ficheiro do Excel em PDF:

1. Utilize a ação Definir variável para criar uma nova variável que contenha o caminho do ficheiro do Excel que pretende converter. Neste exemplo, a variável chama-se ExcelFile.

   

2. Utilize a segunda ação Definir variável para criar uma variável que contenha o caminho do ficheiro PDF que pretende criar. Neste exemplo, a variável chama-se PdfFile.

   

3. Implemente a ação Executar VBScript e povoe o código seguinte.

   Dim Excel
   Dim ExcelDoc
   
   'Opens the Excel file'
   Set Excel = CreateObject("Excel.Application")
   Set ExcelDoc = Excel.Workbooks.open("%ExcelFile%")
   
   'Creates the pdf file'
   Excel.ActiveSheet.ExportAsFixedFormat 0, "%PdfFile%" ,0, 1, 0,,,0
   
   'Closes the Excel file'
   Excel.ActiveWorkbook.Close
   Excel.Application.Quit