Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4051 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【58531】EXCELマクロからバッチファイルを実行．．． あんどーなつ 08/10/29(水) 1:13 質問[未読]
【58535】Re:EXCELマクロからバッチファイルを実行．... 竹蔵 08/10/29(水) 8:08 発言[未読]
【58546】Re:EXCELマクロからバッチファイルを実行．... sasa 08/10/29(水) 16:12 回答[未読]
【58773】Re:EXCELマクロからバッチファイルを実行．... あんどーなつ 08/11/8(土) 20:49 お礼[未読]
【58531】EXCELマクロからバッチファイルを実行．...
質問  あんどーなつ  - 08/10/29(水) 1:13 -
引用なし
パスワード
   したいのですが。。。

sub bat()

Dim test As Double

test = Shell("C:\test.bat", vbMaximizedFocus)

end sub

とすると、実行されません。
一瞬ＤＯＳ画面が表示されますが、何も実行されてません。
ちなみに、マクロからではなく直接 "C:\test.bat"を実行
した場合はうまく動作します。
マクロから実行するには、上のsub bat()をどのように修正
すればよいでしょうか？
【58535】Re:EXCELマクロからバッチファイルを実行...
発言  竹蔵  - 08/10/29(水) 8:08 -
引用なし
パスワード
   CreateObject("WScript.Shell").Run """" & "バッチのフルパス" & """", , True

としたらどうなりますか？
【58546】Re:EXCELマクロからバッチファイルを実行...
回答  sasa  - 08/10/29(水) 16:12 -
引用なし
パスワード
   >一瞬ＤＯＳ画面が表示されますが、何も実行されてません。
一瞬dos画面が表示されますと言う事は、batファイルはちゃんと実行されています。
実行されて、終了するとdos画面は閉じられます。
shellでbatファイルを実行した場合の正常な動作です。

>ちなみに、マクロからではなく直接 "C:\test.bat"を実行
>した場合はうまく動作します。
うまく動作とは？
batの中身は？
何が出来たらいいのでしょう。
あと、カレントドライブをちゃんと設定しなくてもbatファイルは動作」するのでしょうか。
【58773】Re:EXCELマクロからバッチファイルを実行...
お礼  あんどーなつ  - 08/11/8(土) 20:49 -
引用なし
パスワード
   遅くなりましたがご回答ありがとうございました。

ｓａｓａさま
〉カレントドライブをちゃんと設定しなくてもbatファイルは動作するのでしょうか。
test = Shell・・・・・・の前に
カレントドライブを設定した文を一行追加したところbatの中身が正常に動作しました。

竹蔵さま
〉CreateObject("WScript.Shell").Run """" & "バッチのフルパス" & """", , True
上記の前に
カレントドライブを設定した文を一行追加したところこちらも正常に動作しました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4051 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free