使用 VBScript 取消隱藏 Excel 中的工作表

如果 Excel 檔案包含隱藏的工作表，請複製以下步驟讓它們可見：

1. 使用設定變數動作來建立新的變數，其中包含相應 Excel 檔案的檔案路徑。 在此範例中，變數的名稱為 ExcelFile。

   

2. 部署執行 VBScript動作，並填入以下程式碼。

   '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