API Documentation > CorelDRAW > 2025-v26 > EffectLens > IVGEffectLens
EffectLens.PaletteRotation property
Gets or sets the palette rotation amount
Syntax:
Property Get PaletteRotation() As Long
Property Let PaletteRotation(ByVal Value As Long)
Remarks:
The PaletteRotation property returns or set the palette rotation for a Heat map lens.
Examples:
The following VBA example creates a Heat map lens with a palette rotation of 50%. (In this example, the palette rotation value can be specified directly in the CreateLens method as its second parameter. The current approach is used for illustration only).
Sub Test()
Dim s1 As Shape, s2 As Shape
Set s1 = ActiveLayer.CreateRectangle(0, 0, 5, 5)
s1.Fill.ApplyFountainFill
Set s2 = ActiveLayer.CreateEllipse(1, 1, 6, 6)
With s2.CreateLens(cdrLensHeatMap).Lens
  .PaletteRotation = 50
End With 
End Sub