ShapeRange.Shadow (Word)

Renvoie un objet ShadowFormat qui représente la mise en forme ombrée pour la forme spécifiée.

Dim sre As ShapeRange: Set sre =  
Dim sftShadow As ShadowFormat
Set sftShadow = sre.Shadow