0

我需要能够将 MS Office 2013 快捷方式固定在 Windows 8 开始菜单上。我用这个脚本来固定注销按钮,效果很好。我已经修改它以尝试固定 Excel 2013,但它不起作用。

    '
' This script will create shortcuts in the Start Menu
'
set WshShell = WScript.CreateObject("WScript.Shell")
strStartMenu = WshShell.SpecialFolders("StartMenu")

set oShellLink = WshShell.CreateShortcut(strStartMenu & "\Excel.lnk")
oShellLink.TargetPath = "C:\Program Files (x86)\Microsoft Office\Office15\EXCEL.EXE"
oShellLink.WindowStyle = 1
oShellLink.IconLocation = "%ProgramFiles% (x86)\Microsoft Office\Office15\XLICONS.EXE"
oShellLink.Description = "Microsoft Excel 2013"
oShellLink.WorkingDirectory = "C:\Program Files (x86)\Microsoft Office\Office15"
oShellLink.Save
Set oShellLink = Nothing

Wscript.Echo "Created Icons"

我究竟做错了什么?

4

0 回答 0