タイトル : 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の画面がアクティブだったのにエクセルから戻るとエクスプローラが前に出たりしないですよね!? よく分からないのですが、花ちゃんはどう思われますか? |