OLEObject.OLEType (Excel)
Returns the OLE xloletype type. Can be one of the following XlOLEType constants: xlOLELink or xlOLEEmbed. Returns xlOLELink if the xloletype is linked (it exists outside of the file), or returns xlOLEEmbed if the xloletype is embedded (it's entirely contained within the file). Read-only Long. Possible return values are xlOLEControl - ActiveX control, xlOLEEmbed - Embedded OLE object, xlOLELink - Linked OLE object.
Dim xolOLEType As XlOLEType
xolOLEType = ActiveChart.OLEObjects(1).OLEType