| ■ FindWindow |
| 指定したウィンドウを検索しウィンドウハンドルを取得します |
| クラス名とウィンドウタイトルでアプリケーションを検索しますが、一方は省略することが可能です |
| 省略する場合には引数に vbNullString を指定します |
| クラス名はあらかじめ GetClassName などで取得しておきます |
| 取得したウィンドウハンドルは、API のさまざまな処理で利用できます |
Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Dim w_hwnd As Long ' 戻り値
' Microsoft Excel のウィンドウハンドルを取得
w_hwnd = FindWindow("XLMAIN", vbNullString)
|