Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extract Target path from a shortcut
I know how to add a target path to a created shortcut:
Dim WSHShell As Object Dim MyShortcut As Object Set WSHShell = CreateObject("WScript.Shell") Set MyShortcut = WSHShell.CreateShortcut(pathwayhere & ".lnk") With MyShortcut .targetpath = targetpathwayhere .Save End With .........but if I already have a created shortcut then how do I extract the target pathway from it, as a string?? any help greatly appreciated Jason. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extract Target path from a shortcut
Hi Jason,
Try something like: '============= Public Sub Tester() Dim WSHShell As Object Dim MyShortcut As Object Dim sDesktoPath As String Const sShortcutName As String = "YourShortcutName" Set WSHShell = CreateObject("WScript.Shell") sDesktopPath = WSHShell.SpecialFolders("Desktop") Set MyShortcut = WSHShell.CreateShortcut(sDesktopPath _ & "\" & sShortcutName & ".lnk") MsgBox MyShortcut.TargetPath End Sub '<<============= --- Regards, Norman "WhytheQ" wrote in message oups.com... I know how to add a target path to a created shortcut: Dim WSHShell As Object Dim MyShortcut As Object Set WSHShell = CreateObject("WScript.Shell") Set MyShortcut = WSHShell.CreateShortcut(pathwayhere & ".lnk") With MyShortcut .targetpath = targetpathwayhere .Save End With ........but if I already have a created shortcut then how do I extract the target pathway from it, as a string?? any help greatly appreciated Jason. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extract Target path from a shortcut
Very nice Norman!
It was using the "CreateShortcut" method that fooled me: I had it in my head that this would create a new shortcut rather than get a hook on an existing one !! all seems to work ok thanks again Jason |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to extract only file name from folder path string in Excel? | Excel Worksheet Functions | |||
Target directory & Path | Excel Worksheet Functions | |||
extract filename from full path | Excel Programming | |||
Extract Path From String | Excel Programming | |||
Extract full path given filename | Excel Programming |