Hello everybody!
Can you help me?
I have activated "Do not allow loading/saving other workbooks .
I use the SetOption helper.
I have a companion file (filename.xlsb or filename.xlsm.)
I can open it, I can save it under a new name, but I can’t open the saved
file.
Dim XLSPadlock As Object
Set XLSPadlock = Application.COMAddIns(“GXLS.GXLSPLock”).Object
XLSPadlock.SetOption Option:=“2”, value:=“0”
XLSPadlock.SetOption Option:=“1”, value:=“1”
Set wb = Workbooks.Open(PathToCompiledFile(“filename.xlsb”), False, False)
XLSPadlock.SetOption Option:=“2”, value:=“1”
XLSPadlock.SetOption Option:=“1”, value:=“0”
Working with the file.
XLSPadlock.SetOption Option:=“2”, value:=“0”
XLSPadlock.SetOption Option:=“1”, value:=“1”
ActiveWorkbook.SaveAs “D:\My Documents\WorkbookName.xlsb”
XLSPadlock.SetOption Option:=“2”, value:=“1”
XLSPadlock.SetOption Option:=“1”, value:=“0”
How should I open “D:\My Documents\WorkbookName.xlsb” later?
Thank you very much!