Description
Returns an array of tag names of the paragraph styles in all linked libraries of the selected format.
Syntax
object.ParaStyles (i) |
object
Required. Object name. Returned by Dim objFormat = Ted.GetFormat or Dim objFormat = Fred.GetFormat.
i
Required. Index in the range of LBound(aParaStyles) To UBound(aParaStyles).
Example
Dim objFormat As Format = Ted.GetFormat
Dim objT = Ted.GetActiveTxt
objFormat.Id = objT.FormatId
MsgBox(objFormat.DefaultParaCopyFit)
Dim i As Integer
Dim str As String = ""
Dim aParaStyles = objFormat.ParaStyles
str = str & "Paragraph styles: (" & aParaStyles.Count() - 1 & ")" & vbCrLf
For i = 0 To aParaStyles.Count() - 1
str = str & " " & aParaStyles(i) & vbCrLf
Next
Context
Property
See also