Excel中进行VBA指令中调用函数的操作方法
时间:2023-01-09 21:59:35
有时在编写VBA程序时,会发现没有与Excel函数相对应的VBA指令,在此情况下,只能想办法通过引用Excel函数来达到目地,今天,小编就教大家在Excel中进行VBA指令中调用函数的操作方法。
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函数的引用,借此,可以方便我们对函数的引用,避免花费更多的时间在自定义函数上,有效的提高了工作效率。
Excel中进行VBA指令中调用函数的操作方法
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
史上最详细的word打印技巧
![](https://img.aspxhome.com/file/2023/6/32766_0s.jpg)
Excel中RANK函数的语法和用法
![](https://img.aspxhome.com/file/2023/0/a155940_0s.png)
excel做库存结余量的教程详解
Excel2010快速访问工具栏怎么恢复到默认状态?
![](https://img.aspxhome.com/file/2023/1/a141751_0s.jpg)
Excel中进行设置打印去除底纹和颜色的操作技巧
Word中如何创建超链接目录
![](https://img.aspxhome.com/file/2023/4/32174_0s.jpg)
excel2003文字竖排的教程
word如何设置标题样式
![](https://img.aspxhome.com/file/2023/1/34431_0s.gif)
office右键新建没有word选项,如何解决
![](https://img.aspxhome.com/file/2023/3/16723_0s.png)
word2013怎么更改图表类型和颜色
![](https://img.aspxhome.com/file/2023/8/19108_0s.jpg)
Word怎么插入CAD图形? Word正确插入cad的教程
![](https://img.aspxhome.com/file/2023/9/30639_0s.jpg)
Excel运用countifs多条件计数
excel怎样快速把多个单元格内容合并 合并多个单元格内容的设置方法
![](https://img.aspxhome.com/file/2023/6/40366_0s.jpg)
Excel2013怎么在表格文件中添加图片操作方法分享
![](https://img.aspxhome.com/file/2023/2/16042_0s.png)
win10账户控制弹窗怎么关闭?win10账户控制弹窗关闭的方法教程?
![](https://img.aspxhome.com/file/2023/3/47353_0s.jpg)
word最下面两行留白怎么处理?
win10系统睡眠功能丢失怎么办?如何修复win10系统睡眠功能失效的问题?
![](https://img.aspxhome.com/file/2023/6/46926_0s.png)
怎样查看Word2013文档段落数和句子数
![](https://img.aspxhome.com/file/2023/9/20969_0s.jpg)
excel怎么快速计算个人社保扣缴金额?
![](https://img.aspxhome.com/file/2023/3/42543_0s.jpg)