Como sair normalmente fechando o arquivo excel aberto por erro?

Eu uso o arquivo .bat para executar um arquivo .vbs continuamente ... Se ocorrer algum erro, o arquivo em lotes executa o vbscript novamente e continua. O script se conecta via internet a um site para executar algumas chamadas de API. Agora, quando houver um problema de conexão ou qualquer outro erro, o controle sairá do script, mantendo o arquivo do Excel aberto. Dessa maneira, muitos arquivos do Excel são abertos a cada erro ... O código é o seguinte ... por favor, informe-me como fechar o arquivo do Excel por erro e depois sair do script normalmente.

       '{{{{Some coding}}}}

dim objExcel, objWorkbook, objRange
Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("C:\temp.xlsx")
objExcel.Visible = True

       '{{{{Some coding}}}}

objExcel.Cells(xlrow, 3).Value="Test"
objExcel.Cells(xlrow, 3).Select
objExcel.Activecell.Show

       '{{{{Some coding}}}}

objExcel.Workbooks(1).save
objExcel.Workbooks(1).close
objExcel.Quit
Set objExcel = Nothing
Set objWorkbook = Nothing
WScript.Quit

desde já, obrigado