1、依次单击Office按罩陕丽钮，然后选择“Excel选项”：
2、单击“常用”，然后勾选“在功能区显示‘开发工具’选项边阅卡”，然后单击“确定”：
3、依次单宙伟击“开发工具，Visual Basic”后，即可打开VBA编辑器：
1、右击需要插入代码的表，如，本文要达成的目标是单击一个按钮，然后实现对B列3-11单元格的成绩进行等级评定。假设要实现目标的数据位置在Sheet1上，则右击Sheet1，依次单击“插入，模块”，即可打开代码输入框：
2、在打开的代码编辑框里面粘贴如下方的代码，然后直接单击VBA编辑器右上角的关闭按钮：
Sub 评定等级()
Dim i As Integer
For i = 3 To 11
t =Sheets(1).Cells(i, 2).Value '取得成绩
If t >= 90Then
j = "A"
ElseIf t >=80 Then
j = "B"
ElseIf t >=70 Then
j = "C"
ElseIf t >=60 Then
j = "D"
Else
j = "E"
End If
Sheets(1).Cells(i, 3) = j
Next
End Sub
3、依次单击“开发工具，插入，按钮”：
4、在合适的位置直接左键拖出一个按钮，在弹出的“指定宏”对话框里面选择“评定等级”，然后单击“确定”：
5、单击刚添加的按钮“按钮1”：
6、按下按钮之后，即可在C列对应的表格里面显示成绩等级，如下：
