通过

编写可执行语句

  • 项目

可执行语句可启动操作。 它可以执行一个方法或函数，还可以在代码块中进行循环或分支。 可执行语句通常包含数学或条件运算符。

以下示例使用 For Each...下一个 语句，用于循环访问活动Microsoft Excel 工作簿的 Sheet1 上名为 MyRange 的区域中的每个单元格。 变量 c 是 MyRange 中包含的单元格集合中的一个单元格。

Sub ApplyFormat() 
    Const limit As Integer = 33 
    For Each c In Worksheets("Sheet1").Range("MyRange").Cells 
        If c.Value > limit Then 
            With c.Font 
                .Bold = True 
                .Italic = True 
            End With 
        End If 
    Next c 
    MsgBox "All done!" 
End Sub

If...然后。。。示例中的 Else 语句检查单元格的值。 如果值大于 33，则 With 语句设置该单元格的 Font 对象的 Bold 和 Italic 属性。 If...Then...Else 语句以 End If 结束。 With 语句可以保存键入，因为它包含的语句在 With 关键字之后自动在对象上执行。

Next 语句调用 MyRange 中包含的单元格集合中的下一个单元格。

MsgBox 函数 (显示内置 Visual Basic 对话框) 显示一条消息，指示 Sub 过程已完成运行。

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。