ShapeRange.Model3D (Word)

Devuelve un objeto Model3DFormat que contiene propiedades Model3D.

Dim sre As ShapeRange: Set sre =  
Dim mdfModel3D As Model3DFormat
Set mdfModel3D = sre.Model3D