Inside 属性

       

如果为 True,则指定对象可以使用内部边框。Boolean 类型,只读。

expression.Inside

expression   必需。该表达式返回一个 Border 对象。

示例

如果当前所选内容支持内部边框(即选定了多个段落或单元格),则本示例为其设置单线型内部边框。

Dim borderLoop As Border

For Each borderLoop In Selection.Borders
    If borderLoop.Inside = True Then _
        borderLoop.LineStyle = wdLineStyleSingle
Next borderLoop