SAMPLE
function seturl()
{
var Shell, DesktopPath, URL;
Shell = new ActiveXObject("WScript.Shell");
DesktopPath = Shell.SpecialFolders("Desktop");
URL = Shell.CreateShortcut(DesktopPath + "\\Excel VBA.url");
//拡張子は.urlでないといけない
URL.TargetPath = "https://www.mermaid-tavern.com/cgi-bin/perl/ebkinfo.cgi";
URL.Save();
}
これは