LineBetween Property

True if vertical lines appear between all the columns in the TextColumns collection. Can be True, False, or wdUndefined. Read/write Long.

expression   Required. An expression that returns a TextColumns collection object.

Example

This example cycles through each section in the active document and displays a message box if the text columns in the section are separated by vertical lines.

i = 1
For each s in ActiveDocument.Sections
    If s.PageSetup.TextColumns.LineBetween = True Then
        MsgBox "The columns in section " & i & " contain lines."
    End If
    i = i + 1
Next s