API Documentation > CorelDRAW > 2025-v26 > StructAlignProperties > IVGStructAlignProperties
StructAlignProperties.VerticalCharacterShift property
Syntax:
Property Get VerticalCharacterShift() As Long
Property Let VerticalCharacterShift(ByVal Value As Long)
Remarks:
The VerticalCharacterShift property returns or specifies the amount by which to vertically shift the characters in a text object. The value of a vertical character shift is measured as a percentage of the character's point size. For example, if .VerticalCharacterShift equals 50, the character is vertically shifted a distance that is 50% of the character's point size.
Examples:
The following VBA example specifies a vertical character shift of -10% for the second and third words of the text object.
Sub Test()
ActiveShape.Text.AlignPropertiesInRange(2, 2, cdrWordIndexing).VerticalCharacterShift = -10 
End Sub