Dim xla As New ExcelApplication()
Dim wb As Workbook = xla.Open("C:\MySpreadsheet.xlsx")
Dim ws As Worksheet = wb.Worksheets(0)
ws.PivotTables(0).PivotTableSettings.ShowFriendlyErrorCaption= true;
ShowFriendlyErrorCaption is false by default. If it is set to true, FriendlyErrorCaption also needs to be set.