Se ha producido el error '-2147217406 (80041002)' en tiempo de ejecución: Error de automatización al ejecutar la Hoja Electrónica y no muestre la ventana para iniciar sesión.
Al depurar arroja error en
Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")