Hide the active workbook :
ActiveWindow.Visible = False
'unhide it
Windows("Auto_Helpdesk_Proforma.xls").Visible = True