ThisWorkbook.Path is not the path of the .exe-file

I made a .exe file out of my .xlsm-file. Now the vba-code “ThisWorkbook.Path” of the .exe-file does no longer return the pathname of the padlock .exe-file. How to get the pathname of the .exe-file within its VBA?

Read this post
Printing PDF error with v2.4.0
XLS Padlock

This problem is also explained in the user guide. We provide a VBA API call so that you can have ThisWorkbook.Path working again.