Excel VBA質問箱 IV

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

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


3252 / 13644 ツリー ←次へ | 前へ→

【63272】関連付けから Explorarを終了させる 一年生 09/10/21(水) 21:13 質問[未読]
【63284】Re:関連付けから Explorarを終了させる neptune 09/10/22(木) 21:59 回答[未読]

【63272】関連付けから Explorarを終了させる
質問  一年生  - 09/10/21(水) 21:13 -

引用なし
パスワード
   こんにちは

↓を参考に関連付けからTIFファイルを開いてます。
 実行するたびにTIFが重なって開いてます、 
 Explorarを一度閉じるは違う方法を教えてださい。


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

以下を実行マクロの関数の中に入れ

lRet = ShellExecute(0, "open", sPASS, vbNull, vbNull, SW_NORMAL)

【63284】Re:関連付けから Explorarを終了させる
回答  neptune  - 09/10/22(木) 21:59 -

引用なし
パスワード
   ▼一年生 さん:

未確認ですが、 
> Explorarを一度閉じるは違う方法を教えてださい。
一応APIを使っているのでAPIを使う方法としては、
HWNDを取得して、WM_CLOSEを送るとかで出来るような気がします。

が、お勧めはしません。

getobjectでIEを捕まえてNavigateで次のファイルの指定するのがまっとうな
方法と思います。

具体的なコードは・・・・
APIならfindwindow,sendmessage等を、
まっとうな方法なら、getobject IE VBAでググルとあると思います。
自分で調べて下さい。沢山あると思います。

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