ListBulletFontName Property [Publisher 2003 VBA Language Reference]
Sets or retrieves a String representing the list bullet font name from the specified paragraphs. Read/write.
expression.ListBulletFontName
expression Required. An expression that returns a ParagraphFormat object.
Remarks
Returns an "Access Denied" message if the list is not a bulleted list.
Example
This example tests to see if the list type is a bulleted list. If it is, the ListBulletFontName is set to "Verdana" and the ListFontSize is set to 24.
Dim objParaForm As ParagraphFormat
Set objParaForm = ActiveDocument.Pages(1).Shapes(1) _
.TextFrame.TextRange.ParagraphFormat
With objParaForm
If .ListType = pbListTypeBullet Then
.ListBulletFontName = "Verdana"
.ListBulletFontSize = 24
End If
End With
Applies to | ParagraphFormat Object