Преобразуване на файл на Excel в PDF с помощта на VBScript

За да конвертирате файл на Excel в PDF:

1. Използвайте действието Задаване на променлива , за да създадете нова променлива, съдържаща пътя на файла на Excel, който искате да конвертирате. В този пример променливата се нарича ExcelFile.

   

2. Използвайте второ действие Set променлива , за да създадете променлива, съдържаща пътя на PDF файла, който искате да създадете. В този пример променливата се нарича PdfFile.

   

3. Разположете действието Run VBScript и попълнете следния код.

   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