Using EXE + application XPLAPP Bundle with desactivation

I have tried to implement the option to deactivate that comes in the user guide, but when combining the option with EXE + application XPLAPP Bundle, I get this message:

The user guide comes with this example:

Public Sub StartDeactivation()
Dim XLSPadlock As Object
On Error GoTo Err
Set XLSPadlock = Application.COMAddIns(“GXLSForm.GXLSFormula”).Object
XLSPadlock.PLDeactivate
Err:
End Sub
’ You can then invoke the sub thanks to a macro assigned to a button for instance:
Sub AskForDeactivation()
Dim response As Integer

' Ask the user if they really want to deactivate the application
response = MsgBox("Do you really want to deactivate the application?", _

vbQuestion + vbYesNo, “Confirm Deactivation”)

' Check the user's response
If response = vbNo Then
    ' If the user selects "No," exit the procedure
    Exit Sub
Else
    ' If the user selects "Yes," you can call the deactivation function here
     Call StartDeactivation
     Application.Quit
End If

End Sub

Looks like this is a bug. We’ll fix this in the next update.
Thank you for the report!
In the meanwhile, you can modify the VBA code to call the EXE file + passing the -deact switch.

Public Function GetEXEFilename()
Dim XLSPadlock As Object
On Error GoTo Err
Set XLSPadlock = Application.COMAddIns("GXLSForm.GXLSFormula").Object
GetEXEFilename = XLSPadlock.PLEvalVar("EXEFilename")
Exit Function
Err:
GetEXEFilename = ""
End Function

Sub CallEXEWithDeactSwitch()
    Dim exePath As String
    Dim exeSwitch As String
    Dim command As String
    
    ' Define the path to your EXE file
    exePath = GetEXEFilename()
    
    exeSwitch = "-deact"
    
    command = """" & exePath & """ " & exeSwitch
    
    Shell command, vbNormalFocus
End Sub