Workbook Open event

Dear Experts,
I am using below code and need help that if said (Database.xlsx) workbook is being used by another user, macro should popup a message that "Try to Run after some Time" and then exit the macro.

Workbooks.Open Filename:=ThisWorkbook.Path & "\Database.xlsx"
ActiveWindow.WindowState = xlMinimized
ActiveSheet.Shapes("Rectangle 3").Visible = False
ActiveSheet.Shapes("Rectangle 2").Visible = True
Application.ScreenUpdating = True
Call Macro5

Please help me for the said matter.

Thanks in advance.

Did not tested:

Please Login or Register  to view this content.