作者：绿色风
分类：
时间：2022-08-17
浏览：449
楼主
wise |
Q:VBA如何使用Shell函数？
A:具体见如下例子：- Sub 打开D盘()
- Shell "explorer.exe d:" ' 打开D盘
- End Sub
- Sub 打开控制面板()
- Shell "control.exe" ' 打开控制面板 ，甚至可以简写 Shell"control"
- End Sub
- Sub 打开控制面板添加删除程序()
- Shell "control.exe appwiz.cpl" ' 打开控制面板－添加/删除程序
- End Sub
- Sub 添加新硬件()
- Shell "control.exe sysdm.cpl @1" ' 添加新硬件
- End Sub
- Sub 系统()
- Shell "control.exe sysdm.cpl" ' 系统
- End Sub
- Sub 添加删除程序()
- Shell "control.exe appwiz.cpl" ' 添加/删除程序
- End Sub
- Sub Internet属性()
- Shell "control.exe inetcpl.cpl" ' Internet 属性
- End Sub
- Sub 区域设置()
- Shell "control.exe intl.cpl" ' 区域设置
- End Sub
- Sub 游戏控制器()
- Shell "control.exe joy.cpl" ' 游戏控制器
- End Sub
- Sub 鼠标()
- Shell "control.exe main.cpl" ' 鼠标
- End Sub
- Sub 多媒体()
- Shell "control.exe mmsys.cpl" ' 多媒体
- End Sub
- Sub 调制解调器()
- Shell "control.exe modem.cpl" ' 调制解调器
- End Sub
- Sub 网络()
- Shell "control.exe netcpl.cpl" ' 网络
- End Sub
- Sub 密码()
- Shell "control.exe Password.cpl" ' 密码
- End Sub
- Sub 电源管理()
- Shell "control.exe powercfg.cpl" ' 电源管理
- End Sub
- Sub 扫描仪与数字像机()
- Shell "control.exe sticpl.cpl" ' 扫描仪与数字像机
- End Sub
- Sub 日期时间()
- Shell "control.exe timedate.cpl" ' 日期/时间
- End Sub
- Sub 拔号网络()
- Shell "control.exe telephon.cpl" ' 拔号网络
- End Sub
- Sub OBDC数据源管理器()
- Shell "control.exe odbccp32.cpl" ' OBDC 数据源管理器
- End Sub
- Sub 显示()
- Shell "control.exe desk.cpl" ' 显示
- End Sub
- Sub 计算器()
- Shell "calc.exe" '计算器
- End Sub
- Sub 画图()
- Shell "mspaint.exe" ' 画图
- End Sub
 Shell函数.rar
|
2楼
donghan |
学习了，版主 |
3楼
水星钓鱼 |
这个函数很有用 |
4楼
aimstar |
学习了，shell函数功能强大啊。。这么实用的功能。 |
5楼
水星钓鱼 |
再次学习 |
6楼
杭州小菜02 |
shell |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一