« 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

TrackBack URL for this entry:
http://app.cocolog-nifty.com/t/trackback/68055/12116188

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

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