word automation: findin out if my word doc contains another word doc 1

[davikokar]

Hallo,

I have a word document that contains, as inlineshape OLEObject, another word document. I would like to know if there is a way to find out programmatically that the OLEObject in my document is a word document.

 

[fumei]

Yes.

Dim oInline As InlineShape
Set oInline = ActiveDocument.InlineShapes(1)
Debug.Print oInline.OLEFormat.ClassType

returns (for example);

Word.Document.8


unknown

 

[davikokar]

thanks