The creation of shortcuts is done upon opening the spreadsheet. Would it work better if I did it when closing? I found this macro on the internet and it more or less work, just doesn't put anything in the cell "start in" in the shortcut properties.
Sub CreatShortCut()
Dim WSHShell
Set WSHShell = CreateObject("WScript.Shell")
Dim MyShortcut, DesktopPath
DesktopPath = WSHShell.SpecialFolders("Desktop")
Set MyShortcut = WSHShell.CreateShortCut(DesktopPath & "\2014_B620_both_forms_macr1b2.xltm.lnk")
With MyShortcut
.TargetPath = WSHShell.ExpandEnvironmentStrings(Environ("USERPROFILE") & "\Documents\2014_B620_both_forms_macr1b2.xltm")
.Save
End With
End Sub
Is there code I can put in to populate that in the link properties?
desktop_link.JPG
Bookmarks