Excel 识别IMacros版本

我想添加一个小的Excel vba脚本，以确定用户是否具有iMacros版本11。。在过去，我们使用下面的脚本来确定用户是在版本6还是版本7上（我从一个旧的宏中提取了这个）。我试图修改它以检查版本11。但是，V11exe总是false，如果用户有版本11，我需要它为true。目前，我们的用户有10.3或11版。该宏适用于11，但不适用于10.3，因此我想将其添加到宏的开头，如果v11exe为false，它将停止，并显示一个弹出窗口，您必须使用版本11才能使用该宏。有什么建议吗？谢谢你的帮助

Sub iMacVersion()

v6Path = False
v6exe = False
v7Path = False
v7exe = False
v11Path = False
v11exe = False

Set ObjScr = CreateObject("Scripting.FileSystemObject")

v6Path = ObjScr.FolderExists("C:\Program Files\iMacros")
v7Path = ObjScr.FolderExists("C:\Program Files\iOpus\iMacros")
v11Path = ObjScr.FolderExists("C:\Program Files\Ipswitch\iMacros")
If v6Path = True Then v6exe = ObjScr.FileExists("C:\Program Files\iMacros\iMacros.exe")
If v7Path = True Then v7exe = ObjScr.FileExists("C:\Program Files\iOpus\iMacros\iMacros.exe")
If v11Path = True Then v11exe = ObjScr.FileExists("C:\Program Files\Ipswitch\iMacros\iMacros.exe")

Set ObjScr = Nothing

End Sub

---

也许您可以简单地使用该函数而不需要额外的代码行。@Shugar……….谢谢您的建议。我将尝试一下，看看它是否对我有效……。@Shugar………这看起来很有希望。我已经在两台不同的机器（版本10.3/11）上测试了它，得到了两个不同的数字。我请几个人来测试一下，看看这些数字是否一致。如果是这样，我有我需要的解决方案。谢谢你的帮助…很高兴听到。祝你好运也许您可以简单地使用该函数而不需要额外的代码行。@Shugar……….谢谢您的建议。我将尝试一下，看看它是否对我有效……。@Shugar………这看起来很有希望。我已经在两台不同的机器（版本10.3/11）上测试了它，得到了两个不同的数字。我请几个人来测试一下，看看这些数字是否一致。如果是这样，我有我需要的解决方案。谢谢你的帮助…很高兴听到。祝你好运