API Documentation > CorelDRAW > 2025-v26 > EffectDropShadow > IVGEffectDropShadow
EffectDropShadow.Opacity property
Gets or sets the opacity for the dropshadow
Syntax:
Property Get Opacity() As Long
Property Let Opacity(ByVal Value As Long)
Remarks:
The Opacity property returns or specifies the opacity value of a drop shadow. Values range from 0% to 100%. Low values create a less opaque drop shadow, while high values create a more opaque drop shadow.
Examples:
The following VBA example sets the opacity of the selected drop shadow to 80%.
Sub Test()
Dim eff As Effect
Dim bDone As Boolean
If ActiveShape Is Nothing Then
  MsgBox "Nothing selected", vbCritical
  Exit Sub
End If
bDone = False
If ActiveShape.Next.Type = cdrDropShadowGroupShape Then
  Set eff = ActiveShape.Next.Effect
  eff.DropShadow.Opacity = 80
  bDone = True
End If
If Not bDone Then
  MsgBox "The selected shape doesn't have a dropshadow", vbCritical
End If 
End Sub