ListLevel.PictureBullet (Word)

Gibt ein InlineShape -Objekt zurück, das ein Bildaufzählungszeichen darstellt.

Sub PicBullet() 
 ActiveDocument.ListTemplates(1) _ 
 .ListLevels(1) _ 
 .PictureBullet.Width = InchesToPoints(0.25) 
End Sub