在VBA里面,允许我们自定义一个过程,然后通过代码调用,这相当于,构造一个自定义函数,然后对其进行调用,下面为大家介绍。
一、功能代码
Private Sub CommandButton1_Click()
Select Case Sheets("成绩登记表").Cells(3, 7).Value
Case "物理"
physics
Case "化学"
chemistry
Case "生物"
biology
End Select
End Sub
二、过程的函数代码
Sub physics() '物理
Dim Boot
Boot = 4
For i = 4 To 27 '清理原来数据
Sheets("成绩登记表").Cells(i, 1).Value = ""
Sheets("成绩登记表").Cells(i, 2).Value = ""
Sheets("成绩登记表").Cells(i, 3).Value = ""
Next i
End Sub
不知道您注意到了没有,上面红色的字符,就是调用过程及过程函数名,直接输入Sub的名称就行了,相当简单,勿需质疑。