diff --git a/Examples/VBA/ChangePivotTablesVBA.ps1 b/Examples/VBA/ChangePivotTablesVBA.ps1
index 6fce580..b61d4a6 100644
--- a/Examples/VBA/ChangePivotTablesVBA.ps1
+++ b/Examples/VBA/ChangePivotTablesVBA.ps1
@@ -59,4 +59,4 @@ $VBAThisWorkbookModule.Code = $Macro
 Add-PivotTable -PivotTableName "SalesPivot" -Address $ExcelPackage.Sales.Cells["E1"] -SourceWorksheet $ExcelPackage.Sales `
     -SourceRange $ExcelPackage.Sales.Tables[0].Address -PivotRows "Region", "Item" -PivotData @{ "TotalSold" = "Sum" }
 
-Close-ExcelPackage -ExcelPackage $ExcelPackage
+Close-ExcelPackage -ExcelPackage $ExcelPackage -Show
\ No newline at end of file