本文介绍几个vba中shell函数的使用实例。
第一：shell函数打开文件夹
Sub打开D盘()
Shell"explorer.exed:\应用软件\"
EndSub
解释：shell函数打开D盘应用软件文件夹。
第二：shell函数打开网站
Sub超链接()
Shell"explorer.exehttp://www.ittribalwo.com",vbMaximizedFocus
EndSub
解释：shell函数直接打开IT部落窝网站。
第三：shell函数打开控制面板
Sub打开控制面板()
Shell"control.exe"
EndSub
解释：打开控制面板，也可以简写为：Shell"control"
第四：shell函数打开计算器
Sub计算器()
Shell"calc.exe" '计算器
EndSub
第五：shell函数打开当前文件夹路径下的其余文件
Sub打开当前文件夹路径下的文件()
mfile=Chr(34)&ThisWorkbook.Path&"\indirect函数解释"&Chr(34)
Shell"excel.exe "&mfile'注意excel.exe 后面的空格
EndSub
上面这段适用于2007和2010，下面这段代码适用于excel2003版本。
Submyshell()
myfile=Chr(34)&ThisWorkbook.Path&"\indirect函数解释"&Chr(34)
Shell"excel.exe "&myfile
EndSub
Vba中shell函数的实例很多，文章只是罗列了几个shell函数常用的，供大家参考。
