Blue Prism MS Excel VBO - Pivot Table Report Layout Design

bpmsexcelpivot.cs

dim wb, ws, excel, sheet, PtvTbl as Object

Try

wb = GetWorkbook(Handle, Workbook)
ws = GetWorksheet(Handle, Workbook, Worksheet)

wb.Activate()
ws.Activate()

excel = ws.Application
sheet = excel.ActiveSheet

PvtTbl = ws.PivotTables(PivotTableName)
' For tabular design
PvtTbl.RowAxisLayout(1)
' For compact design
' PvtTbl.RowAxisLayout(0)

Success = True

Catch e As Exception
Success = False
Message = e.Message()

Finally

PvtTbl = Nothing
ws = Nothing

End Try