怎么在VBA指令中调用Excel函数

怎么在VBA指令中调用Excel函数

　　有时在编写VBA程序时，会发现没有与Excel函数相对应的VBA指令，在此情况下，只能想办法通过引用Excel函数来达到目地.

　　下面小编就教你怎么在VBA指令中调用Excel函数:

　　打开 Microsoft Office Excel 2007，点击 “开始” ->“Excel 选项”。

　　在弹出的对话框中，选择“常规”选项卡，并在右侧点选“在功能区显示‘开发工具’选项卡”，并单击“确定"。

　　在单元格A1中输入“弧度”，单元格B1中输入“角度”，单元格A2中输入“3.14”，然后在单元格B2中输入公式"=DEGREES(A2)"在按下回车后，该单元格输出结果为179.9087477。

　　注：DEGREES函数的作用是将弧度转化为角度。

　　接下来，我们用VBA实现同样的功能。点击“开发工具”选项卡，单击“Visual Basic”，启动Visual Basic编辑器。

　　在“Microsoft Excel 对象”上点鼠标右键，依次点击“插入” -> “模块”，创建“模块1”，并在该模块中输入内容：

　　Sub 转换()

　　MsgBox Application.WorksheetFunction.Degrees(3.14)

　　End Sub

　　点击“运行子过程/用户窗体”按钮，在弹出的对话框中选择“转换”，然后点击“运行”按钮。

　　程序弹出对话框，结果与在Excel中利用公式输出的结果一样，只是有效数字的位数不一样，这可以根据需要加以取舍。