Excel VBA質問箱 IV

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

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


71048 / 76734 ←次へ | 前へ→

【10186】Re:ウインドウネームを取得できますか?
回答  Seraph  - 04/1/9(金) 20:02 -

引用なし
パスワード
   ▼EMU さん:

>▼Seraphさん、こんばんわ。たびたび恐れ入ります。
どもども

最初に説明しておけばよかったのかもしれませんが、、、

>〜上記の処理でウインドウ名取得〜
>Windows(strWindowName).Activate
>
>とすれば、アクティブウインドウを変更できると考えていたのですが、
>「実行時エラー’9’
> インデックスが有効範囲にありません。」
>とメッセージが出てきてしまいます。
>どうしたらよいかおしえていただけませんか?

Windows(strWindowName).Activate で、Excel以外のウィンドウを
イジる事は出来ません。
このコードを、長く書くと

Excel.Application.Windows(strWindowName).Activate

となります。
つまり、Excel内のウィンドウを指し示しているのです。

なので、strWindowNameの内容がWindowsコレクション内のどのWindowオブジェクト
にも名前が一致しません。
で、エラーとなって「インデックスが有効範囲にありません。」と言うメッセージが
出るのです。

従って、ご希望の処理を行うには、先のコードで取得したウィンドウハンドルを引数
にしてAPIの SetForegroundWindow()関数 を呼出すのが良いと思います。

0 hits

【10136】ウインドウネームを取得できますか? EMU 04/1/8(木) 16:57 質問
【10138】Re:ウインドウネームを取得できますか? Seraph 04/1/8(木) 17:27 回答
【10141】Re:ウインドウネームを取得できますか? EMU 04/1/8(木) 18:32 質問
【10143】Re:ウインドウネームを取得できますか? Seraph 04/1/8(木) 20:21 回答
【10153】Re:ウインドウネームを取得できますか? EMU 04/1/9(金) 9:55 質問
【10172】Re:ウインドウネームを取得できますか? Seraph 04/1/9(金) 14:48 回答
【10180】Re:ウインドウネームを取得できますか? EMU 04/1/9(金) 17:17 質問
【10185】Re:ウインドウネームを取得できますか? Kein 04/1/9(金) 19:24 回答
【10193】Re:ウインドウネームを取得できますか? EMU 04/1/10(土) 17:46 質問
【10195】Re:ウインドウネームを取得できますか? kein 04/1/10(土) 21:19 回答
【10222】Re:ウインドウネームを取得できますか? EMU 04/1/13(火) 12:22 質問
【10223】Re:ウインドウネームを取得できますか? kein 04/1/13(火) 12:34 回答
【10224】Re:ウインドウネームを取得できますか? EMU 04/1/13(火) 13:45 お礼
【10186】Re:ウインドウネームを取得できますか? Seraph 04/1/9(金) 20:02 回答
【10194】Re:ウインドウネームを取得できますか? EMU 04/1/10(土) 18:35 お礼

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