The FindWindow() function finds the first top-level window in the window list that satisfies the specified arguments. : Windows Resources « Windows API « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Windows API
  3. Windows Resources

The FindWindow() function finds the first top-level window in the window list that satisfies the specified arguments.

 
Public Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function GetClassName Lib "user32.dll" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, nMaxCount As Long) As Long
Private Sub FindHandle()
    Dim hForm As Long, rv As Long
    Dim s As String
    hForm = FindWindow(vbNullString, "UserForm1")
    Debug.Print hForm
    s = String(256, "x")   'Creates a string with 256 x's
    rv = GetClassName(hForm, s, 255)
    Debug.Print Left(s, rv)
End Sub








Related examples in the same category

1.Clipping and Unclipping the Cursor
2.Check Whether an Excel File Is Open on a Network
3.Custom About Dialog
4.Disable the X for Closing a Userform
5.Check mouse button
6.Returns the Windows directory
7.Get execuatable file name from a given file name
8.Get screen width and height
9.Get window's rectangle
10.Find window by class name
11.Show Excel Window Size
12.Get color depth
13.Get DC and release it
14.Get user name
15.Get the computer name
16.Freeze a window
17.Change the Excel icon