API32を用いてコンボボックスの選択メッセージを送りたい

Question

エクセルvbaから他ソフトに入力,選択をしようとしています。
テキストボックスへの入力やコンボボックス内の選択肢の変更はできるのですが、コンボボックスの選択肢を変更した際に起きるはずのアクションが起きません。
コンボボックスを選択するのは以下のコードを使っています。

SendMessageStr(コンボボックスのハンドル, &H14E, 選びたいものの順番, 0) 'CB_SETCURSEL = &H14E

上記コードではおそらくコンボボックスのテキストを書き換えるだけで「CBN_SELCHANGE」が発生していないのかと思うのですが、この「CBN_SELCHANGE」を発生させる方法がいまいちわかりません。
自分で調べた範囲では下記のようなコードで解決できそうな気がするのですが、各パラメータに何を指定すればいいのかを理解することが出来ませんでした。

PostMessage(WM_COMMAND, MAKEWPARAM(CBN_SELCHANGE, IDC_COMBO), (LPARAM)
GetSafeHwnd());

「CBN_SELCHANGE」を送る先のハンドルや変更したコンボボックスのハンドルを指定する必要があるのかと思うのですがどのパラメーターがそうなのでしょうか？それとも別のパラメータなのでしょうか？
ご教示お願いします。

Answer 1

選択したあと WM_COMMAND を投げるんだそうです。

■続：別プログラムのコンボボックスを選択するには

Hongliangさん、ありがとうございます。

無事解決できました。
CBN_SELCHANGEの値を１６ビット左にシフトした結果の&H10000を指定することでできました
そして、SendMessageではなくPostMessageにしたらＯＫでした。

Public Declare Function SendMessage Lib "user32" _
      Alias "SendMessageA" (ByVal hwnd As Integer, _
                            ByVal wMsg As Integer, _
                            ByVal wParam As Integer, _
                            ByVal lParam As String) As Integer

Public Declare Function PostMessage Lib "user32" _
      Alias "PostMessageA" (ByVal hwnd As Integer, _
                            ByVal wMsg As Integer, _
                            ByVal wParam As Integer, _
                            ByVal lParam As Integer) As Integer

Const CB_SELECTSTRING = &H14D
Const WM_COMMAND = &H111
Const CBN_SELCHANGE = &H10000
SendMessage(ComboHandle, CB_SELECTSTRING, -1, "Printer A")
PostMessage(OyaHandle, WM_COMMAND, CBN_SELCHANGE, ComboHandle)

Comments

[masa246]

ありがとうございます！これでうまくいきました！！
長く調べたのが嘘のようです。本当にありがとうございます！