have each workbook open as stand alone??

[jinx_uk_98]

Hi All,

I use this code to impose some restrictions on users using my workbook.

Sub remove_tool()
Dim CommandBar
Application.ScreenUpdating = False
With Application
For Each CommandBar In .CommandBars
CommandBar.Enabled = False
Next
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
With Application.ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = False
.WindowState = xlMaximized
End With

'creates new commandbar
Call AddCommandBar
'creates controls of the new commandbar
Call addnewMenuItem


The only problem is that code imposes itself on any other workbooks the user may already be open.

Is there anyway to have my workbook open in it's own environment almost standalone?

Hope that makes sense.

Kevin

End Sub

 

[dtchan]

Try using this:

Application.IgnoreRemoteRequests = True

This forces excel to open the workbook in a new instance of excel.