Excel VBA質問箱 IV

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

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


44004 / 76732 ←次へ | 前へ→

【37752】Re:筆まめの起動方法について
お礼  Gori  - 06/5/17(水) 22:22 -

引用なし
パスワード
   ▼Kein さん:
>原因は分かりませんが、他のソフトを起動する方法はいくつかあります。
>例えば Win32API の ShellExecute とか WshShell オブジェクト の
>Runメソッドです。いちおうそれらも試してみて下さい。

Keinさん
早速のご教示ありがとうございました。
ShellExecute を試したところ、うまく起動することができました。

〔宣言節〕
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) _
As Long

〔モジュール〕
  Dim Ret As Long
  Dim PG As String
'
  PG = "C:\Program Files\Creoapp\Mamew14\Mamew14.exe"
'--> EXEプログラムの実行
  Ret = ShellExecute(w1, "Open", PG, "", "", SW_SHOWNORMAL)

以上です。
ほんとうにありがとうございました。

0 hits

【37725】筆まめの起動方法について Gori 06/5/16(火) 22:45 質問
【37733】Re:筆まめの起動方法について Kein 06/5/17(水) 12:41 発言
【37752】Re:筆まめの起動方法について Gori 06/5/17(水) 22:22 お礼

44004 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free