「送る」メニューに「SendToフォルダにショートカットを送る」を作る。

「送る」にSendToフォルダのショートカット「SendToフォルダ.lnk」を作れば、SHIFT+CTRLを押しながら「SendToフォルダ」に送れば、ショートカットが送れますが、面倒です。

そこで、SendToフォルダに「SendToフォルダ(&N).lnk」と「SendToフォルダにショートカット.vbs」を作ります。

CreateObject("WScript.Shell").SendKeys "+{f10}n+^n"

ここで、アクセスキーが重複しないよう、SendToフォルダにNで始まるものがないようにします。

ほかのフォルダにショートカットを送る場合も同様にできます。