Excel 2007 statusbar hWnd
On Jul 2, 1:56 pm, "Bob Phillips" wrote:
Jamie,
From Winspector, the class of the status bar seems to be Excel2 now, which
is a pain.
This seems to work
Dim hThis As Long
Dim hExcel2 As Long
Dim hStatus As Long
hThis = FindWindow("XLMAIN", Application.Caption)
hExcel2 = FindWindowEx(hThis, 0&, "EXCEL2", vbNullString)
hStatus = FindWindowEx(hExcel2, 0&, "MsoCommandBar", "Status Bar")
Thanks Bob. Works for me too!
Jamie.
--
|