ExpandUsingKashida Property

Microsoft Publisher Visual Basic

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