Workbook.ServerViewableItems (Excel)
Allows a developer to interact with the list of published objects in the workbook that are shown on the server.
This property returns a collection of the items that could be published to Excel Services. It can include Tables, PivotTables, Named Ranges, and Charts. It can also contain Sheets as long as it is not a mixture of Sheets and the before mentioned list.
Dim svisServerViewableItems As ServerViewableItems
Set svisServerViewableItems = ActiveWorkbook.ServerViewableItems