Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5981 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【47948】マクロを使い、ボタンでソフトなどファイルをひらくには？ たくや 07/3/27(火) 19:35 質問[未読]
【47950】Re:マクロを使い、ボタンでソフトなどファ... ichinose 07/3/27(火) 19:50 発言[未読]
【47952】Re:マクロを使い、ボタンでソフトなどファ... たくや 07/3/27(火) 20:30 発言[未読]
【47957】Re:マクロを使い、ボタンでソフトなどファ... ichinose 07/3/28(水) 8:46 発言[未読]
【47980】Re:マクロを使い、ボタンでソフトなどファ... たくや 07/3/28(水) 21:52 お礼[未読]
【47948】マクロを使い、ボタンでソフトなどファイ...
質問  たくや  - 07/3/27(火) 19:35 -
引用なし
パスワード
   マクロで、電卓などのソフトを起動させるには
どうのようにすればよいでしょうか？

デスクトップにあるファイルはひらけないのでしょうか？？

教えてください。
【47950】Re:マクロを使い、ボタンでソフトなどフ...
発言  ichinose  - 07/3/27(火) 19:50 -
引用なし
パスワード
   ▼たくや さん：
こんばんは。

>マクロで、電卓などのソフトを起動させるには
>どうのようにすればよいでしょうか？

Sub test()
　　With CreateObject("WScript.Shell")
　　　 .Run "calc.exe"
　　　 End With
End Sub
これですか？
【47952】Re:マクロを使い、ボタンでソフトなどフ...
発言  たくや  - 07/3/27(火) 20:30 -
引用なし
パスワード
   ▼ichinose さん：
回答ありがとうございます。

できましたら説明文をつけていただけると助かります。

あと、ウインドウズメディアプレーヤーを
きどうさせるにはどうすればよいでしょうか？

>▼たくや さん：
>こんばんは。
>
>>マクロで、電卓などのソフトを起動させるには
>>どうのようにすればよいでしょうか？
>
>Sub test()
>　　With CreateObject("WScript.Shell")
>　　　 .Run "calc.exe"
>　　　 End With
>End Sub
>これですか？
【47957】Re:マクロを使い、ボタンでソフトなどフ...
発言  ichinose  - 07/3/28(水) 8:46 -
引用なし
パスワード
   おはようございます。

>
>できましたら説明文をつけていただけると助かります。
Wshについては、

www.roy.hi-ho.ne.jp/mutaguchi/wsh/object/wshshell.htm

のRunメソッドを参照してください。
また、VBAのShell関数でも出来ます。


>>
>>Sub test()
>>　　With CreateObject("WScript.Shell")
'Createobject関数もHelpで確認してください
>>　　　 .Run "calc.exe"
>>　　　 End With
>>End Sub


Sub test()
　　With CreateObject("wscript.shell")
　　　 .Run "wmplayer.exe"
'バージョンによって名前が違うなら、調べて正しい名前を指定する
'検索パスに登録されていなければ、フルパスで指定する
　　　 End With
End Sub
【47980】Re:マクロを使い、ボタンでソフトなどフ...
お礼  たくや  - 07/3/28(水) 21:52 -
引用なし
パスワード
   ▼ichinose さん：
ありがとうございました。
本当に助かります。


>おはようございます。
>
>>
>>できましたら説明文をつけていただけると助かります。
>Wshについては、
>
>www.roy.hi-ho.ne.jp/mutaguchi/wsh/object/wshshell.htm
>
>のRunメソッドを参照してください。
>また、VBAのShell関数でも出来ます。
>
>
>>>
>>>Sub test()
>>>　　With CreateObject("WScript.Shell")
>'Createobject関数もHelpで確認してください
>>>　　　 .Run "calc.exe"
>>>　　　 End With
>>>End Sub
>
>
>Sub test()
>　　With CreateObject("wscript.shell")
>　　　 .Run "wmplayer.exe"
>'バージョンによって名前が違うなら、調べて正しい名前を指定する
>'検索パスに登録されていなければ、フルパスで指定する
>　　　 End With
>End Sub
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5981 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free