Creating a SHORTCUT to a file in XLSTART
You can use the WScript shell object. The sub below will find the XLstart
folder and place a shortcut called StartABC that targets the workbook
C:\test\abc.xls.
Sub xlstartLINK()
Dim wsh As Object
Dim lnk As Variant
Dim strXLstart As String
strXLstart = Application.StartupPath
Set wsh = CreateObject("WScript.Shell")
Set lnk = wsh.CreateShortcut(strXLstart & "\StartABC.lnk")
lnk.TargetPath = "C:\test\abc.xls"
lnk.Save
End Sub
Steve
"jason" wrote in message
om...
probably a lot easier than I imagine this one!
i'd like to progrmmatically create a shortcut to a file in my XLstart
file.
anybody any ideas?
|