Freigeben über


Arbeitsblätter in Excel mit VBScript einblenden

Wenn eine Excel-Datei ausgeblendete Arbeitsblätter enthält, führen Sie die folgenden Schritte aus, um sie sichtbar zu machen:

  1. Verwenden Sie die Aktion Variable festlegen, um eine neue Variable mit dem Dateipfad der jeweiligen Excel-Datei zu erstellen. In diesem Beispiel heißt die Variable ExcelFile.

    Screenshot der Aktion „Variable festlegen“, die den Pfad der Excel-Datei enthält.

  2. Stellen Sie die Aktion VBScript ausführen bereit und füllen Sie den folgenden Code aus.

    'Opens the Excel file'
    Set objExcel = CreateObject("Excel.Application")
    Set objWorkbook = objExcel.Workbooks.Open("%ExcelFile%")
    objExcel.Application.Visible = True
    
    'Unhides all the worksheets of the Excel file'
    For i=1 To objWorkbook.Sheets.Count
    objWorkbook.Sheets(i).Visible = True
    Next
    
    'Saves and closes the Excel file'
    objWorkbook.Save
    objWorkbook.Close SaveChanges = True
    

    Screenshot der konfigurierten Aktion „VBScript ausführen“.