Charg, Если хамским образом закрыть все экземпляры эксплорера, то после oIE.quit
Код:

Program = "iexplore.exe"
Set WMI = GetObject("winMgmts:")
SQuery = "Select *From Win32_Process Where Name=" + """" + Program + """"
Set Processes = WMI.ExecQuery(SQuery)
For Each Process In Processes
Process.Terminate
Next