Get local save folder path

 

Purpose: get local save folder path

This lets you retrieve the path to the local folder where XLS Padlock stores your application’s settings and secure save files.

Insert the following code:

Public Function GetStoragePath()

Dim XLSPadlock As Object

On Error GoTo Err

Set XLSPadlock = Application.COMAddIns("GXLSForm.GXLSFormula").Object

GetStoragePath = XLSPadlock.PLEvalVar("SPath")

Exit Function

Err:

GetStoragePath = ""

End Function

 

The previous code can be tested with:

 

Sub Test_GetStoragePath()

 MyPath = GetStoragePath

 MsgBox (MyPath)

End Sub

 


Copyright © 2021 G.D.G. Software