Font.ExpandUsingKashida property (Publisher)

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

Syntax

expression.ExpandUsingKashida

expression A variable that represents a Font object.

Return value

MsoTriState

Remarks

The ExpandUsingKashida property value can be one of the MsoTriState constants declared in the Microsoft Office type library and shown in the following table.

Constant	Description
msoFalse	Microsoft Publisher does not apply kashida rules while applying tracking to Arabic text.
msoTriStateMixed	A return value indicating a combination of msoTrue and msoFalse for the specified text range.
msoTriStateToggle	A set value that switches between msoTrue and msoFalse.
msoTrue	Publisher does apply kashida rules while applying tracking to Arabic text.

Example

The following example sets 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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.