[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2006/08/07(Mon) 16:48
投稿者名:すけさん
Eメール:
URL :
タイトル:
パワーポイント強制終了
VB6側から、もしパワーポイントが起動していたら
強制終了させるようなことは可能でしょうか?
VBで起動したEXEを終了させるとうな方法は
あるようですが、VB側から起動していない、
パワーポイントがあったら終了させたいのです。
どうぞ詳しい方ご教授いただけますでしょうか。

投稿時間:2006/08/07(Mon) 18:32
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: パワーポイント強制終了
下記では。

他のEXEのハンドルを取得しVBから終了する
http://hanatyan.sakura.ne.jp/vbhlp/handle.htm

投稿時間:2006/08/08(Tue) 11:20
投稿者名:Blue
Eメール:
URL :
タイトル:
Re: パワーポイント強制終了
GetObjectでPowerPoint.Applicationオブジェクトを取得して、Quitさせるとか。

    Dim objPP As Object
    
    On Error Resume Next
    Set objPP = GetObject(, "PowerPoint.Application")
    On Error GoTo 0
    If Not objPP Is Nothing Then
        objPP.Quit
    End If

ちなみに上の例では、「すべての」起動しているパワーポイントを終了させていません。
複数起動していれば、どれか1つを終了させます。すべてを終了させるには応用してください。

投稿時間:2006/08/08(Tue) 18:07
投稿者名:すけさん
Eメール:
URL :
タイトル:
Re^2: パワーポイント強制終了
花ちゃんさん、Blueさん、ありがとうございます。
Blueさんの方法で基本テストやってみました。
パワーポイント終了できました。
ありがとうございました。