run.vbs 파일 생성
Dim Arg, var1, var2
Set Arg = WScript.arguments
var1 = Arg(0)
'var2 = Arg(1) ==> 주석
msgbox var1
Set WshShell = CreateObject("WScript.Shell")
'WshShell.Run chr(34) & "C:\Windows\notepad.exe" "D:\aaa.txt" & Chr(34),1 ==>주석
WshShell.Run "notepad.exe " & var1 ==> chr(34)를 빼고 하니 됨
Set WshShell = Nothing
'IT > Excel & VB & VBA' 카테고리의 다른 글
Excel Java JDBC로 ODBC연결 (0) | 2023.02.05 |
---|---|
엑셀 숫자 타입 날짜 변경 (0) | 2022.06.18 |
[Excel] 참고 사이트 정리 (0) | 2020.12.13 |
[Excel] 엑셀시트 ODBC로 연결하여 SQL 처리 (0) | 2020.12.13 |
[Excel] 파일처리(파일목록 및 하이퍼링크 생성) (0) | 2020.12.13 |