View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Steve Yandl[_3_] Steve Yandl[_3_] is offline
external usenet poster
 
Posts: 117
Default 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?