kurukuru-papaのブログ

主に、ソフトウェア開発に関連したメモを書き溜めたいと思います。

2008-12-23から1日間の記事一覧

MS-DOSコマンドを実行し、結果を取得する

ExcelVBA

' DOSコマンドを実行する ' 2008/12/22 新規作成 Public Sub U_Exec(cmd As String, resultArr As Variant) Dim wsh Dim exec Dim resultStr ' 前準備 Set wsh = CreateObject("WScript.Shell") Set exec = wsh.exec("%ComSpec% /c " & cmd) ' コマンド実行 …