ExpandUsingKashida Property

       

Returns or sets an MsoTriState constant indicating whether to apply kashida rules while applying tracking to Arabic text. Read/write.

MsoTriState can be one of these MsoTriState constants.
msoCTrue  Not used with this property.
msoFalse  Microsoft Publisher does not apply kashida rules while applying tracking to Arabic text.
msoTriStateMixed  Return value indicating a combination of msoTrue and msoFalse for the specified shape range.
msoTriStateToggle  Set value that toggles the property value between msoTrue and msoFalse.
msoTrue  Publisher does apply kashida rules while applying tracking to Arabic text.

expression.ExpandUsingKashida

expression   Required. An expression that returns one of the objects in the Applies To list.

Example

The following example sets Microsoft Publisher to apply kashida rules while applying tracking to Arabic text for all text ranges on page one of the active publication.

Dim shpLoop As Shape

For Each shpLoop In ActiveDocument.Pages(1).Shapes
    If shpLoop.HasTextFrame Then
        shpLoop.TextFrame.TextRange _
            .Font.ExpandUsingKashida = msoTrue
    End If
Next shpLoop