上一节,介绍了工作表函数
这一节,我们了解一下VBA内置函数
并免费提供自动打字并保存的程序
VBA内置函数
顾名思义,VBA内置函数,
就是VBA自带的已经定义好的函数,
在VBA可直接使用。
VBA内置函数,如下图:
Excel 中按下 Alt+F11,然后 F2,下拉框中选择 VBA,可见上图VBA内置函数
其中,常用的有
Msgbox(),
InputBox(),等等……
这2个前面已经用过了,
这里就不再讲了哈。
今天介绍3个有意思的VBA内置函数:
- Shell():执行Windows程序或命令
- AppActivate() :激活应用
- SendKeys() :发送按键
编写和运行自动打字并保存的程序:
完整代码如下:
源程序代码
Sub 打开记事本自动打字保存()
'打开Windows自带的记事本程序
记事本 = Shell("C:\windows\notepad.exe", 1)
'切换到记事本窗口
Call AppActivate(记事本, 1)
'自动打字
'(引号内的文本,可以自定义,随意替换)
SendKeys "你好世界!我是Excel VBA!"
'回车换行
SendKeys "{Enter}"
'自动保存
SendKeys "^S"
'自动输入文件名:带日期时间后缀
'(第一个引号内的文本,可以自定义,随意替换)
SendKeys "你好世界" _
& Format(Now, "-YYYY-MM-DD-HHMMSS") _
& ".TXT"
'确认保存
SendKeys "{Enter}"
End Sub执行程序,效果如图:
自动命名保存为文本文件
怎么样?是不是挺有意思的?
酷不酷?可要试一下?
通过上述简单实例,
快速学习了Excel VBA内置函数,
编写运行了自动打字保存的程序。
你学费了吗?
待续……
<script type="text/javascript" src="//mp.toutiao.com/mp/agw/mass_profit/pc_product_promotions_js?item_id=7477952892021588480"></script>