Workbook.ContentTypeProperties (Excel)

Retorna uma coleção metaproperties que descreve os metadados armazenados na pasta de trabalho. Somente leitura.

Dim mpsContentTypeProperties As Office.MetaProperties
Set mpsContentTypeProperties = ActiveWorkbook.ContentTypeProperties