Saving a secure copy of the workbook Error 9

XLS Padlock
#1

I have copied this VBA-Code from the User Guide:

Public Function SaveSecureWorkbookToFile(Filename As String)
Set XLSPadlock = Application.COMAddIns(“GXLS.GXLSPLock”).Object
SaveSecureWorkbookToFile = XLSPadlock.SaveWorkbook(Filename)
End Function

I have tried to use this function but in the line
"Set XLSPadlock = Application.COMAddIns(“GXLS.GXLSPLock”).Object"
it appears the runtime error:
Laufzeitfehler 9
Index außerhalb des gültigen Bereichs

Please let me know how this error can be resolved.

with best regards

#2

The VBA code from the user guide has been updated in XLS Padlock 2.1. Please update your code and the VBA error 9 will be fixed.

#3

Hello there,
I have installed the latest version and adopted the code accordingly.
The line of code “Set XLSPadlock = Application.COMAddIns (” GXLS.GXLSPLock “). Object” generates said mistakes again and again.
Is that maybe because a DLL is missing on my machine: GXLSPLock.dll?
This DLL has not been installed.
Best regards

#4

The VBA code snippets in the user guide have been updated too in version 2.1. Please take a look at the user guide and replace your existing code with the new one. It should fix these mistakes.

#5

Hello there,
I have the code from the new User Guide Version adopted.
The fault no. 9 but is still displayed.
What should I do?
Best regards
Udo

#6

Please double-check that the “On Error goto …” line is in the new code.