Syntax:
Property Get HotZone() As Double
Property Let HotZone(ByVal Value As Double)
Remarks:
The HotZone property returns or specifies the distance between the last word in a line and the right margin before hyphenation occurs. For the HotZone property to work, the StructHyphenationSettings.UseAutomaticHyphenation property must be set to True.
Examples:
The following VBA example specifies a hyphenation hot-zone of 7 millimeters for the selected text object.
Sub Test()
ActiveDocument.Unit = cdrMillimeter
ActiveShape.Text.HyphenationSettings.HotZone = 7 
End Sub