tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: エクセルのプレビューから元のVB画面に戻る方法
投稿日: 2011/06/08(Wed) 18:26
投稿者あさがお44
ありがとうございます。

そのとおりです。
エクスプローラーの後ろに隠れてしまいます。
初めにPGの画面がアクティブだったのにエクセルから戻るとエクスプローラが前に出ているのです。

花ちゃんの教えてくださったAppActivate ステートメントでやってみたのですが
AppActivate title の titleが何か良く分かりません。
(アクティブにするアプリケーション ウィンドウのタイトル バーのタイトルを表す文字列式を指定します。)とヘルプにあるのでCaptionを使ったらエラーになります。

で、もう一つのSetForegroundWindowを使ってみました。
出来たのですが、実はエクセルを前面に出すためにすでに使っています。
前に書かせてもらったプログラムコードの
retL = KY_SetXLAP(AppExcel)
は実は
Public Function KY_SetXLAP(ByVal XLAPP As Object) As Long
    'Excel2007="12.0" Excel2003="11.0" Excel2002="10.0" Excel2000="9.0"
    If Val(XLAPP.Version) > 9 Then
        KY_SetXLAP = SetForegroundWindow(XLAPP.hwnd)
    End If
End Function
というプログラムコードにいきます。
で思ったのですが、そもそもこのコードが間違っているからエクスプローラが前にくるのでは?
ふつう初めにPGの画面がアクティブだったのにエクセルから戻るとエクスプローラが前に出たりしないですよね!?
よく分からないのですが、花ちゃんはどう思われますか?

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。