Hide the active workbook :

 

ActiveWindow.Visible = False

'unhide it

Windows("Auto_Helpdesk_Proforma.xls").Visible = True