How to get the path where a shortcut of an Excel sheet is located

[Stefan Mueller]

If you start an Excel sheet (e.g. Test.xls) you can get the path where
the Excel sheet is located with
MsgBox (ActiveWorkbook.Path)

Now you create a shortcut (e.g. Shortcut of Test.xls) and move it to
another directory. If you start that shortcut
MsgBox (ActiveWorkbook.Path)
still shows the path where the Excel sheet is located.

Does someone know how to get the path where the shortcut is located?

PS: In real VB I do it with a FileListBox: MsgBox (FileListBox1.Path)

 

[Guest]

Sorry, I am pretty sure that the OS does the translation of the sortcut and
Excel is passed the real file not the shortcut. So there is no way from
inside Excel to know where the shortcut is.

Peter

 

[Stefan Mueller]

Hmm, but how can the VB's FileListBox do it?
Actually, the VB FileListBox doesn't show the path where the shortcut
is located, it shows the path entered in 'Start in:' of the shortcut.

Do you think I can somehow get this information within Excel?