在 VBA 中，CreateObject(“WScript.Shell”) 是用于创建一个 WScript.Shell 对象的方法。WScript.Shell 对象是 Windows Script Host (WSH) 的一部分，它可以被用来执行各种系统级别的任务，如启动应用程序、打开文件、读写注册表等。
通过 CreateObject 方法创建 WScript.Shell 对象后，我们可以使用该对象的方法和属性来执行以下常见任务：
- 启动应用程序：使用 Run 方法来启动一个新进程，并运行指定的可执行文件或命令行。
- 打开文件：使用 Exec 方法来打开一个文件，并将其关联的应用程序作为一个进程运行。
- 读写注册表：使用 RegRead 和 RegWrite 方法读取和修改 Windows 注册表中的键值。
- 显示消息框：使用 Popup 方法来显示一个消息框，并提示用户输入或确认操作。
- 获取系统路径和环境变量：使用 Environment 属性获取系统路径和环境变量。
下面是一些示例代码，展示了如何在 VBA 中使用 WScript.Shell 对象：
' 启动记事本Set objShell = CreateObject("WScript.Shell")objShell.Run "notepad.exe"' 打开文本文件Set objShell = CreateObject("WScript.Shell")objShell.Exec "notepad.exe C:\Users\user\Desktop\example.txt"' 读取注册表键值Set objShell = CreateObject("WScript.Shell")strValue = objShell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Desktop")' 显示消息框Set objShell = CreateObject("WScript.Shell")intResult = objShell.Popup("Hello, World!", 5, "Message Box", vbInformation)' 获取系统路径和环境变量Set objShell = CreateObject("WScript.Shell")strPath = objShell.Environment("System")("Path")strUser = objShell.Environment("User")("USERNAME")
需要注意的是，WScript.Shell 对象可以执行一些强大的操作，但也存在一些安全风险。例如，使用 WScript.Shell 对象来启动外部程序可能会导致恶意代码被执行。因此，在使用该对象时，请谨慎考虑安全问题，并遵循最佳实践。
