1、通过实例和大家分享我的经验,【实例:90分以上标注“√”】!
2、依次点击工作表中,菜单栏【开发工具】——【visual basic】。
3、进入VB工作表,点击菜单栏中的【插入】,在下拉菜单中,选择【模块】。
4、在弹出的【模块】窗口,进行代码编辑!
5、编辑的代码如下:Sub 分数等级标注()Dim rs As Integerrs = 2Dors = 1 + rsIf Sheet4.Cells(rs, 2) = 媪青怍牙"" ThenExit DoElseIf Sheet4.Cells(rs, 2) >= 90 Then Sheet4.Cells(rs, 3) = "√"End IfLoopEnd Sub
6、同时按下CTRL+F11键,返回工作表,点击【开发工具】菜单下的【插入】按钮,选择一表单控件。
7、在工作表中的空白处,用鼠标一拉,便会出现一按钮,同时在弹出的【指定宏】窗口,选取刚才编辑的模块!
8、点击【标注】按钮,立即标注完毕!