CaptionLabels Property Example
This example sets the numbering style for table captions.
CaptionLabels(wdCaptionTable).NumberStyle = _
wdCaptionNumberStyleLowercaseRoman
This example adds a new caption label named "Photo" and then inserts a photo caption.
CaptionLabels.Add Name:="Photo"
With Selection
.InsertParagraphAfter
.InsertCaption Label:="Photo"
End With