ShapeRange.Shadow (Excel)

Retorna um objeto ShadowFormat somente leitura que contém propriedades de formatação de sombra para a forma especificada ou formas.

Dim sftShadow As ShadowFormat
Set sftShadow = ActiveChart.OLEObjects.ShapeRange.Shadow