excel中VBA程序调用函数的方法
2017-05-05
相关话题
有时在编写VBA程序时,会发现没有与Excel函数相对应的VBA指令,在此情况下,只能想办法通过引用Excel函数来达到目地,今天,小编就教大家如何利用VBA程序调用Excel函数的方法。
Excel中VBA程序调用函数的方法如下:
打开 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中利用公式输出的结果一样,只是有效数字的位数不一样,这可以根据需要加以取舍。

总结:在进行VBA编程时,可以通过WorkSheetFunction方法来实现对Excel函数的引用,借此,可以方便我们对函数的引用,避免花费更多的时间在自定义函数上,有效的提高了工作效率。