TIMFOX123
asked on
Can I create a explorer link to my excel spread sheet while still in excel ?
What I do now ( with every spread sheet I create
Save it under a name
find it in explorer
create a short cut
copy the short cut to my task bar.
What I want to do is:
while in the excel spreadsheet, create a shortcut to my task bar.
Just so you know, I create the short cut, use it and after I submit the spread sheet, I delete the link from my task bar but keep the spread sheet. The link means " please finish this sheet :
thx
Save it under a name
find it in explorer
create a short cut
copy the short cut to my task bar.
What I want to do is:
while in the excel spreadsheet, create a shortcut to my task bar.
Just so you know, I create the short cut, use it and after I submit the spread sheet, I delete the link from my task bar but keep the spread sheet. The link means " please finish this sheet :
thx
Paste this macro in a module.
Now when you run it, it will create a shortcut of the current Excel file on the desktop :)
Hope this helps.
Sid
Now when you run it, it will create a shortcut of the current Excel file on the desktop :)
Hope this helps.
Option Explicit
Sub CreateShortCut()
'~~> This will Create a ShortCut of your current workbook in our desktop
'~~> Please ensure that the workbook is saved as a precautionary measure
Dim VbsObj As Object, MyShortcut As Object
Dim TargetPath As String, ShortCutPath As String, ShortCutname As String
Set VbsObj = CreateObject("WScript.Shell")
TargetPath = ActiveWorkbook.FullName
ShortCutPath = "Desktop"
ShortCutname = ActiveWorkbook.Name
ShortCutPath = VbsObj.SpecialFolders(ShortCutPath)
Set MyShortcut = VbsObj.CreateShortCut(ShortCutPath & "\" & ShortCutname & ".lnk")
MyShortcut.TargetPath = TargetPath
MyShortcut.Save
End Sub
Sid
Could you confirm which OS are you using? Let me try the above with the taskbar as well :)
Sid
Sid
ASKER
xp
Ok. Just so that my understanding is clear, you want to place the shortcut in the 'Quick Launch' in the taskbar?
Sid
Sid
ASKER
Yes
thank you
thank you
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Great job !!
thx
thx
Sid