ShapeRange.Model3D (Word)

Renvoie un objet Model3DFormat qui contient les propriétés Model3D.

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