Microsoft Access Club Access超初心者対象Forum Access初級者対象Forum Access VBA Tips Forum DAO、ADO、SQL Forum

     

リストへもどる

投稿記事の一括表示

タイトル最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42595
投稿日: 2011/08/16(Tue) 10:45
投稿者木漏れ日
解決済: ON
OS:XP
Access Version:2007

タイトルのようにアクティブでないIEが最小化になっており、それをACCESSから元の大きさに戻して表示する方法をご教授いただけないでしょうか。
よろしくお願いいたします。

タイトルRe: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42599
投稿日: 2011/08/18(Thu) 10:30
投稿者hatena
解決済: ON
下記が参考になるかと。

VBAでIEを開いて最大化したい。 | OKWave
http://okwave.jp/qa/q5503310.html

タイトルRe^2: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42602
投稿日: 2011/08/19(Fri) 13:33
投稿者木漏れ日
解決済: ON
hatena様

遅くなりました、ありがとうございます。
教えていただいた方法でできました。
ですが、IEを複数開いていた場合に違うIEを表示してしまう可能性があります。
指定のIEを元の大きさで開くにはどうしたらよいでしょうか?
よろしくお願いいたします。

タイトルRe^3: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42603
投稿日: 2011/08/19(Fri) 13:59
投稿者hatena
解決済: ON
> ですが、IEを複数開いていた場合に違うIEを表示してしまう可能性があります。
> 指定のIEを元の大きさで開くにはどうしたらよいでしょうか?
> よろしくお願いいたします。

「指定のIE」の具体的な内容を説明ください。

VBAから何らかの方法で開いたのなら、その時にウィンドウハンドルを取得しておけば、
いいですが。

タイトルRe^4: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42604
投稿日: 2011/08/19(Fri) 14:25
投稿者木漏れ日
解決済: ON
hatena様

> 「指定のIE」の具体的な内容を説明ください。

アクセスからCreateObjectを使用して、IEを起動し、URL(固定)を指定します。
例えばアクセスからIEを起動して、URLをグーグルのトップなどへ指定。
(StrURL = "http://www.google.co.jp/")

起動したIEのテキストへ値をインプットしますので、このIEが最小化になっている場合に最小化を解除し、表示できたらと考えました。


> VBAから何らかの方法で開いたのなら、その時にウィンドウハンドルを取得しておけば、
> いいですが。
無知で申し訳ありません。ウインドウハンドルとは何でしょうか?
よろしくお願いいたします。

タイトルRe^5: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42605
投稿日: 2011/08/19(Fri) 15:15
投稿者Hank
解決済: ON
> 申し訳ありません。
と思うのなら、ググったりしてみたら?

タイトルRe^6: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42606
投稿日: 2011/08/19(Fri) 16:07
投稿者木漏れ日
解決済: ON
調べてみてもチンプンカンプンです。
IE一つ一つにもハンドルと呼ばれるユニークな番号がふられていて、それをAPIを使用して取得できるという事でしょうか><
もう少し勉強してみます。

タイトルRe^7: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42607
投稿日: 2011/08/19(Fri) 18:33
投稿者hatena
解決済: ON
> IE一つ一つにもハンドルと呼ばれるユニークな番号がふられていて、それをAPIを使用して取得できるという事でしょうか><

そういう理解であっています。
最初に紹介した方法では、APIを使って、ウィンドウ操作をしていますが、APIでは、
ウィンドウハンドルで操作するウィンドウを特定します。

CreateObject でIEを起動した直後は、IEがアクティブになっていると思いますので、
アクティブなウィンドウのハンドルを取得するAPIがあったと思いますので、
それでハンドルを取得しておいて、あとから利用すればできそうな気がします。
API に関してはWEB検索で調べてみてください。

ただ、IEを起動した後、ユーザーが操作することを許すと、最小化だけでなく、
閉じてしまったり、別のページへ移動してしまったりとか、で希望の動作になら
ない危険性もあります。

そこで、私の場合は、WEBからデータを取得したり、WEBに対してなんらかの操作を
したい場合は、Web Browser コントロールをフォーム上に配置して、そこで操作する
ようにしています。
使用例は、ここの過去ログやWEBを検索すればいろいろ見つかると思います。
Web Browser コントロール は中身はIEそのものですので、現状のコードがそのまま使えると
思います。検討されてはどうでしょうか。

タイトルRe^8: 最小化になっているIEをACCESSで元の大きさに戻して表示
記事No42614
投稿日: 2011/08/21(Sun) 00:51
投稿者木漏れ日
解決済: ON
> そこで、私の場合は、WEBからデータを取得したり、WEBに対してなんらかの操作を
> したい場合は、Web Browser コントロールをフォーム上に配置して、そこで操作する
> ようにしています。
> 使用例は、ここの過去ログやWEBを検索すればいろいろ見つかると思います。
> Web Browser コントロール は中身はIEそのものですので、現状のコードがそのまま使えると
> 思います。検討されてはどうでしょうか。

hatenaさんありがとうございます。
土日が休みのためにアクセスが触れませんので、月曜日また挑戦してみます。
できましたら報告します。

タイトル参考
記事No42615
投稿日: 2011/08/21(Sun) 10:44
投稿者しゃく
解決済: ON
下記ExcelVBAだけどDOM等参考になるかと思います

ExcelVBAによるInternetExplorer制御講座 
http://www.macrogirls.net/

タイトルRe: 参考
記事No42618
投稿日: 2011/08/22(Mon) 13:14
投稿者木漏れ日
解決済: ON
hatena様、しゃく様

調べてみても難しい事ばかりで今でもチンプンカンプンで、頭痛がします。
お二人に教えていただきまして、下記でうまくいきました。
感謝申し上げます。
また何かございましたらお力添えよろしくお願いいたします。


objIE.Navigate "JavaScript:document.frmSearch.submit()"

'最小化されている場合は元に戻す(9=RESTORE:最小化前の状態)
If IsIconic(objIE.hWnd) Then
ShowWindowAsync objIE.hWnd, &H9
End If
'最前面に表示
SetForegroundWindow (objIE.hWnd)

- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

ページの先頭へ 前ページへ戻る