I really wish I knew how I could help you out with this; I feel bad.

hwnd = FindWindow(vbNullString, vbNullString)
"Compile Error: Type Mismatch" for FindWindow.