bradyboyy88
Well-known Member
- Joined
- Feb 25, 2015
- Messages
- 562
All,
I have a macro as shown below that keep excel in its own instance. However, if you open a workbook that has a message such as the do you want to open in read only message then that message comes up before the workbook_open event fires so its still in the same instance until the user clicks on the message pop up to confirm and my workbook_open will finally trigger. Is there any way around this?
I have a macro as shown below that keep excel in its own instance. However, if you open a workbook that has a message such as the do you want to open in read only message then that message comes up before the workbook_open event fires so its still in the same instance until the user clicks on the message pop up to confirm and my workbook_open will finally trigger. Is there any way around this?
Code:
'Create a seperate instances for any excel files trying to open while this is open
Private Sub App_WorkbookOpen(ByVal Wb As Workbook)
Dim xlApp As Application
If Wb Is ThisWorkbook Then
Exit Sub
End If
If Wb.ReadOnly <> True Then
Application.DisplayAlerts = False
Wb.ChangeFileAccess xlReadOnly
Application.DisplayAlerts = True
End If
Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks.Open Wb.FullName
xlApp.Visible = True
Wb.Close False
'Just for this program since it seems to leave window back open again
ThisWorkbook.Application.Visible = False
End Sub
Last edited: