rtContainer	textRuns
rtContainer All As rtCollection BeginInsert containsStyle defineLabel defineLabelAsText docLinks As rtEnumeration hasContent hotspots As rtEnumeration ID ParentObject sections As rtEnumeration Style As rtStyle tables As rtEnumeration textRuns As rtEnumeration add addAfter addNewLine As rTextParagraph addPageBreak As rTextParagraph appendItemValue appendStyle appendText As rTextParagraph AddBefore AddCollection contains createTextRange As rTextRange Collection As rtCollection Count EndInsert Find As rTextRange FindNext As rTextRange getFirstElement getLastElement getNextElement getPrevElement getRichTextItem getText importRTF New remove replaceItemValue root As rtContainer Replace SetStyle	version 1.5 Property Get textRuns As rtEnumeration Returns an rtEnumeration object that contains all rTextRun objects in scope - all the basic text usually split only on style and/or paragraph boundaries. The objects are returned in same order as in item/container. In case of embedded objects first returned is parent object then all child objects. In case any of child objects contain embedded objects itself they are always returned before the next sibling. Use rtEnumeration to quickly process the returned objects: Dim obj as Variant, enum as rtEnumeration set enum = ctx.TextRuns Do while enum.hasMoreElements set obj = enum.nextElement ... do something to the returned object Loop