Text.Frames

Property Frames As TextFrames

Member of Text

The Frames property returns the collection of all if the frames in the text range.

The Frames property returns a read-only value.

The following code example creates two paragraph-text frames and links them together. It then displays the number of frames in the collection.

Sub Test() 
 Dim s As Shape 
 Dim s1 As Shape 
 Dim d As Document 
 Dim t As Text 
 Set d = CreateDocument 
 Set s = d.ActiveLayer.CreateParagraphText(3, 3, 5, 5, String$(400, 
"T")) 
 Set s1 = d.ActiveLayer.CreateParagraphText(6, 6, 8, 8) 
 Set t = s.Text 
 ' Link the frames together 
 t.Frame.LinkTo s1 
 ' Display frames count 
 MsgBox t.Frames.Count 
End Sub