Konvertovanie súboru Excel do PDF pomocou jazyka VBScript

Ako previesť súbor programu Excel na PDF:

1. Pomocou akcie Nastaviť premennú vytvorte novú premennú obsahujúcu cestu k súboru programu Excel, ktorý chcete konvertovať. V tomto príklade má premenná názov ExcelFile.

   

2. Pomocou druhej akcie Nastaviť premennú vytvorte premennú obsahujúcu cestu k súboru PDF, ktorý chcete vytvoriť. V tomto príklade má premenná názov PdfFile.

   

3. Nasaďte akciu Spustiť VBScript a vyplňte nasledujúci kód.

   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