Application.AutoCaptions (Word)

Renvoie une collection AutoCaptions qui représente les légendes ajoutées automatiquement lorsque des éléments tels que des tableaux et des images sont insérés dans un document.

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, voir renvoi d’un objet à partir d’une collection.

Dim captionLoop as AutoCaption 
 
For Each captionLoop In AutoCaptions 
 If captionLoop.AutoInsert Then MsgBox captionLoop.Name 
Next captionLoop