Propriété InlineShape.IsPictureBullet (Word)

La valeur True indique qu'un objet InlineShape constitue une puce image. Boolean (en lecture seule).

Syntaxe

expression. IsPictureBullet

Expression Expression qui renvoie un objet « InlineShape ».

Remarques

Bien que les puces images sont considérés comme étant des formes fixes, objet InlineShapes d'un document de la recherche ne renvoie pas les puces images.

Exemple

Cet exemple montre comment mettre en forme la liste sélectionnée si celle-ci contient des puces images. Dans le cas contraire, un message s'affiche.

Sub IsSelectionAPictureBullet(shp As InlineShape) 
 On Error GoTo ErrorHandler 
 If shp.IsPictureBullet = True Then 
 shp.Width = InchesToPoints(0.5) 
 shp.Height = InchesToPoints(0.05) 
 End If 
 Exit Sub 
ErrorHandler: 
 MsgBox "The selection is not a list or " & _ 
 "does not contain picture bullets." 
End Sub

Pour appeler la routine ci-dessus, utilisez le code suivant :

Sub CallPic() 
 Call IsSelectionAPictureBullet(shp:=Selection _ 
 .Range.ListFormat.ListPictureBullet) 
End Sub

Voir aussi

Objet InlineShape

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.