Excel VBA質問箱 IV

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

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


9656 / 76736 ←次へ | 前へ→

【72641】Re:マクロが止まる理由?
発言  たつ  - 12/8/30(木) 14:31 -

引用なし
パスワード
   ▼ウッシ さん:

ありがとうございます。
2回目に教えてもらったコードでも、ダメでした。
hExe = FindWindow("hlexpl32", vbNullString)
↑こちらに変えてもダメでした。(泣)

いろいろネットでも調べていて、下記内容をみてみて、試してみました。
******************************************************
'ウインドウ名を指定する場合
Private Sub Command1_Click()
  Dim ret As Long
  ret = FindWindow(vbNullString, "無題 - メモ帳")
  Me.Caption = ret
End Sub

'クラス名を指定する場合
Private Sub Command2_Click()
  Dim ret As Long
  ret = FindWindow("Notepad", vbNullString)
  Me.Caption = ret
End Sub
******************************************************************
と書いてあったので、
ウィンドウ名を指定する場合を参考に、
vbnullStringとシテイアプリ名の順番を変えてみたら、
↓↓
hExe = FindWindow(vbNullString, "TCPLink6680エミュレータ - TCP6680-Ses01")

hExeに数値が入りましたが、数値が入ったということは、取得しているのでしょうか?

しかし、次のhEntには数値0が返ってきました。
hEnt = FindWindowEx(hExe, 0, "Edit", vbNullString)

Call SendMessage(hEnt, WM_SETTEXT, 0, ByVal "%( )")
Call SendMessage(hEnt, WM_SETTEXT, 0, ByVal "R")

どうして、うまく取得してくれないのでしょうか?
困惑中です

0 hits

【72618】マクロが止まる理由? たつ 12/8/29(水) 9:56 質問
【72620】Re:マクロが止まる理由? ウッシ 12/8/29(水) 12:03 回答
【72637】Re:マクロが止まる理由? たつ 12/8/30(木) 10:54 質問
【72638】Re:マクロが止まる理由? ウッシ 12/8/30(木) 11:26 回答
【72639】Re:マクロが止まる理由? たつ 12/8/30(木) 12:57 質問
【72640】Re:マクロが止まる理由? ウッシ 12/8/30(木) 13:15 回答
【72641】Re:マクロが止まる理由? たつ 12/8/30(木) 14:31 発言
【72643】Re:マクロが止まる理由? ウッシ 12/8/30(木) 15:03 回答
【72646】Re:マクロが止まる理由? とおりすぎ 12/8/30(木) 15:42 回答

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