语法

表达式.Strikethrough

表达式   一个代表 Font 对象的变量。

示例

本示例将 Sheet1 中活动单元格的字体设置为加删除线。

Worksheets.Item("Sheet1").Activate()
ActiveCell.Font.Strikethrough = true