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