Application.AutoCaptions (Word)

Devuelve una colección AutoCaptions que representa los títulos que se agregan automáticamente cuando se insertan en un documento elementos como tablas e imágenes.

Para obtener información sobre cómo devolver un solo miembro de una colección, vea devolver un objeto de una colección.

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