Maybe just one shortcut...

Dim macro
Dim XLApp
Dim XLWkb
Dim MacroName

If wscript.arguments.count = 0 Then
macroName = InputBox ("type a macro name")
Else
macroname = WScript.Arguments.item(0)
end If

If macroname = "" Then
'do nothing
Else
macro = "Personal.xla!" & macroname

Set XLApp = CreateObject("Excel.Application")

xlapp.visible = true
xlapp.workbooks.add
xlapp.workbooks.open "c:\yourpath\XLSTART\personal.xla"

xlapp.run macro

End If


And just have the .vbs prompt you for the macro name.

wrote:

kewl - works!
"excel.vbs" was a working title.
Saving shortcuts (such as e.vbs) in c:\windows\command puts them on the
command Path and thus accessable via the Run box with minimal
keystrokes, reducing final useage to "windows-r e.vbs macroname enter"
which is much more convenient than clearing screen to the desktop to
locate/double-click an icon; at least for me.

--

Dave Peterson