Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2007 statusbar hWnd
Anyone know how to get the handle of the statusbar in Excel 2007? For
earlier versions I'm using: Dim hThis As Long hThis = FindWindow(vbNullString, ThisWorkbook.Caption) Dim hExcel4 As Long hExcel4 = FindWindowEx(hThis, 0, "EXCEL4", vbNullString) Thanks, Jamie. -- |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2007 statusbar hWnd
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") -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Jamie Collins" wrote in message oups.com... Anyone know how to get the handle of the statusbar in Excel 2007? For earlier versions I'm using: Dim hThis As Long hThis = FindWindow(vbNullString, ThisWorkbook.Caption) Dim hExcel4 As Long hExcel4 = FindWindowEx(hThis, 0, "EXCEL4", vbNullString) Thanks, Jamie. -- |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
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. -- |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2007 statusbar hWnd
For my interest Jamie, what do you need the handle of the status bar for?
Bob "Jamie Collins" wrote in message ups.com... 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. -- |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2007 statusbar hWnd
On Jul 2, 3:35 pm, "Bob Phillips" wrote:
For my interest Jamie, what do you need the handle of the status bar for? To create 'stacked' progress bars. Jamie. -- |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2007 statusbar hWnd
Interesting. Is this for a work project, or will you publish to the world? I
did a stacked progress bar recently, on a form, but the status bar would be nice (didn't even think of that). -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Jamie Collins" wrote in message ups.com... On Jul 2, 3:35 pm, "Bob Phillips" wrote: For my interest Jamie, what do you need the handle of the status bar for? To create 'stacked' progress bars. Jamie. -- |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Displaying data on Excel Statusbar? | Excel Programming | |||
HWND of Listbox in UserForm in Excel macro | Excel Programming | |||
Getting hWnd for API call or Color choosing dialog | Excel Programming | |||
hWnd of UserForm | Excel Programming | |||
how to get hwnd from application object? | Excel Programming |