If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
How to create short cuts in excel?
|
#2
|
|||
|
|||
The subject should summarize the question it's okay if they match, but empty
postings are somewhat of a nuisance, like when is the question going to appear. To create a shortcut key for a macro Alt+F8 (Tools, macro, macros), select the macro, options, key in shortcut key. More information http://www.mvps.org/dmcritchie/excel...x2k.htm#mykeys --- HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001] My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm Search Page: http://www.mvps.org/dmcritchie/excel/search.htm "bk1803" wrote in message ... |
#3
|
|||
|
|||
Sub CreateShortCut()
Dim oWSH As Object Dim oShortcut As Object Dim sPathDeskTop As String Set oWSH = CreateObject("WScript.Shell") sPathDeskTop = oWSH.SpecialFolders("Desktop") Set oShortcut = oWSH.CreateShortCut(sPathDeskTop & "\" & _ ActiveWorkbook.Name & ".lnk") With oShortcut .TargetPath = ActiveWorkbook.FullName .Save End With Set oWSH = Nothing End Sub -- HTH RP (remove nothere from the email address if mailing direct) "bk1803" wrote in message ... |
#4
|
|||
|
|||
I have of course read the subject as creating a shortcut to the file on the
desktop. -- HTH RP (remove nothere from the email address if mailing direct) "Bob Phillips" wrote in message ... Sub CreateShortCut() Dim oWSH As Object Dim oShortcut As Object Dim sPathDeskTop As String Set oWSH = CreateObject("WScript.Shell") sPathDeskTop = oWSH.SpecialFolders("Desktop") Set oShortcut = oWSH.CreateShortCut(sPathDeskTop & "\" & _ ActiveWorkbook.Name & ".lnk") With oShortcut .TargetPath = ActiveWorkbook.FullName .Save End With Set oWSH = Nothing End Sub -- HTH RP (remove nothere from the email address if mailing direct) "bk1803" wrote in message ... |
#5
|
|||
|
|||
and another possibility would be to programmatically create an
Excel shortcut -- an example of which might be http://www.mvps.org/dmcritchie/excel...x2k.htm#foobar which might be of interest to Excel 2003 users and I hope the next version of Excel does not repeat misuse of Ctrl+A. My goodness, what one can learn with an ambiguous question. --- HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001] My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm Search Page: http://www.mvps.org/dmcritchie/excel/search.htm "Bob Phillips" wrote in message ... I have of course read the subject as creating a shortcut to the file on the desktop. -- HTH RP (remove nothere from the email address if mailing direct) "Bob Phillips" wrote in message ... Sub CreateShortCut() Dim oWSH As Object Dim oShortcut As Object Dim sPathDeskTop As String Set oWSH = CreateObject("WScript.Shell") sPathDeskTop = oWSH.SpecialFolders("Desktop") Set oShortcut = oWSH.CreateShortCut(sPathDeskTop & "\" & _ ActiveWorkbook.Name & ".lnk") With oShortcut .TargetPath = ActiveWorkbook.FullName .Save End With Set oWSH = Nothing End Sub -- HTH RP (remove nothere from the email address if mailing direct) "bk1803" wrote in message ... |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
i need to create an invioce in EXCEL and then send it into a WORD. | cassie | General Discussion | 1 | March 12th, 2005 07:49 PM |
EXCEL TO OUTLLOK | Woodsmith | General Discussion | 0 | July 6th, 2004 12:29 AM |
Create Dist List from Excel file? | Ellen B | Contacts | 1 | June 7th, 2004 11:54 PM |
How to create transparent objects on images in Excel | Simon Lenn | Charts and Charting | 1 | December 23rd, 2003 05:12 AM |