Presentation.CommandBars (PowerPoint)

Returns a CommandBars collection that represents the merged command bar set from the host container application and Microsoft PowerPoint. This property returns a valid object only when the container is a DocObject server, like Microsoft Binder, and PowerPoint is acting as an OLE server.

Dim cbsCommandBars As Office.CommandBars
Set cbsCommandBars = ActivePresentation.CommandBars