Opening another instance of Excel

[thesquirrel]

I have a program where I have require a button to open an additional
instance of Excel not just another window within the same instance.

Here is the code I have currently:

'Set variables for document location
ServerLoc = txtMasterServerLoc.Value
Filename = txtMasterFileName.Value

'check to see if the ServerLoc has a '\' at the end and add it if
not
If Right$(ServerLoc, 1) = "\" Then
docloc = ServerLoc & Filename
Else
docloc = ServerLoc & "\" & Filename
End If

'Open the Master Checklist
Workbooks.Open Filename:=docloc

However this doesn't work to open a new instance, it just opens the
document in the same instance of Excel.

Although this isn't a critical fix for this application, i have users
crying that its inconvenient. Love that!!

Thanks guys

 

[thesquirrel]

WOOT!! thanks, that worked perfectly

'Begin Creating the new Excel Window Objects
Dim xlApp As Object
Set xlApp = CreateObject("excel.application")

'make sure the new Excel window is visible
xlApp.Visible = True

'Open the Master Checklist
xlApp.Workbooks.Open Filename:=docloc

'release the object reference
Set xlApp = Nothing

Thanks Tom