I have a working VBA program that was developed for XP. We are starting to upgarde to W7 and one of the users ran my program and received the error "Run-time error '-2147024893 (80070003)': Method 'Run' of object 'IWshShell3' failed"  The code that created the error:     Set objShell = CreateObject("WScript.Shell")     objShell.Run "N:\Shared\TOandPGI\TOCounter.vbs" Thanks in advance for any help - Mike