1、实例【将大于等于90的分数设置为：红色、华文彩云、加粗、下划线、斜体？】
2、在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!
3、会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！
4、会弹出模块编辑窗口！
5、在代码编辑窗口输入以下代码：Sub 大于等于90分为红色()Set i = Columns(3).End(xlDown)Range([a2]荑樊综鲶, i).ClearFormatsFor Each rng In Range([a2], i) If rng >= 90 Then With rng.Font .Name = "华文彩云" .Size = 14 .Bold = 1 .Italic = 1 .Color = RGB(255, 0, 0) .Underline = True End With End IfNextEnd Sub
6、在VBA界面，点击【运行】按钮！
7、我们会发现，大于等于90的分数设置为了：红色、华文彩云、加粗、下划线、斜体
