æè¡è | 15:50VBAããAdobe Readerã§PDFãã¡ã¤ã«ãå°å·ããã(ãã®ï¼)Adobe Reader 6.0 ã 8.1Sub PdfPrint(File)Dim fsoDim wShellDim PathDim oExecSet fso = CreateObject("Scripting.FileSystemObject")Set wShell = CreateObject("WScript.Shell")Path = wShell.RegRead("HKLM\Software\Microsoft\Windows\CurrentVersion\App Paths\acrord32.exe\")Path = Replace(Path, """", "")Path = wShell.ExpandEnvironmentStrings(Path)File = fso.GetFi
{{#tags}}- {{label}}
{{/tags}}