« WinSCP | Main | Napster 国内サービス開始 »

Oct 02, 2006

Excelからバッチファイルの実行

ExcelのVBAを使用して、バッチファイルを実行する。

----
Sub SCP()
   
 Dim SCP As Double
 Dim File_Name As String

 ' 実行するファイルのフルパスをセルC2に指定しておきます
  File_Name = Range("B2").Value

  SCP = Shell(File_Name, vbNormalFocus)

End Sub
----

Shell関数の第二引数は
vbHide 0 フォーカスを持ち、非表示にされるウィンドウ。
vbNormalFocus 1 フォーカスを持ち、元のサイズと位置に復元されるウィンドウ
vbMinimizedFocus 2 フォーカスを持ち、最小化表示されるウィンドウ
vbMaximizedFocus 3 フォーカスを持ち、最大化表示されるウィンドウ
vbNormalNoFocus 4 最後にウィンドウを閉じたときのサイズと位置に復元されるフォーカスを持たないウィンドウ。現在アクティブなウィンドウは、アクティブのままです。
vbMinimizedNoFocus 6 最小化表示されるフォーカスを持たないウィンドウ。現在アクティブなウィンドウは、アクティブのままです。

←クリック一票

|

« WinSCP | Main | Napster 国内サービス開始 »

VBA」カテゴリの記事

Comments

Post a comment



(Not displayed with comment.)


Comments are moderated, and will not appear on this weblog until the author has approved them.



TrackBack


Listed below are links to weblogs that reference Excelからバッチファイルの実行:

« WinSCP | Main | Napster 国内サービス開始 »