Getting EXE Filename

 

Purpose: getting EXE Filename

This lets you retrieve the filename of the EXE file.

Use the following VBA code:

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

 

You can then call the function:

Sub Get_EXE_Filename()

 MsgBox (GetEXEFilename())

End Subb

 


Copyright © 2021 G.D.G. Software