このコードを正しく修正するにはどうすればよいですか?私はそれが "スタートメニュー"のスペースと関係があると思う。問題は、別のドライブでファイルを実行するときに発生します。たとえば、私のP:ドライブ Set objShell = WScript.CreateObject("WScript.Shell")
File = "%appdata%\Microsoft\Windows\Start Menu
複数の文書があり、開発者モードからの制限が必要です。 私はそれはあなたが同じようにファイルを保護するために同様のコードを使用することができます Dim strFolder
Const xlTypePDF = 0
strFolder = WScript.Arguments(0)
if Wscript.Arguments.Count > 0 Then
Set objFSO = Cr