Underline 属性

       

返回或设置应用于字体的下划线类型。可为以下 XlUnderlineStyle 常量之一。Variant 类型,可读写。

expression.Underline

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

本示例将 Sheet1 中活动单元格的字体设为单下划线。

Worksheets("Sheet1").Activate
ActiveCell.Font.Underline = xlUnderlineStyleSingle