Thanks for clarifying that: yes, I should be using SetWindowLong.
Unfortunately, the three XLCTL windows turn out to be resizing controls for
the workbook scrollbars; the TabStrip control is well and truly hidden.
Visible Excel objects are an odd mix of standard Windows components for
exotic jobs and exotic handcrafted objects for commonplace Windows actions.
Oh well: looks like I'll have to do some work... For people who value their
time so much that a worksheet tab that's scrolled out of view is uneconomical
to chase with the mouse.
Nile
__________________________________________________ ______________
"The Meek Shall Inherit The Earth. In very small plots, about six feet by
three"
"Timo Kunze" wrote:
Nile_Hef schrieb:
SendMessage(hwndCtrl, TCS_MULTILINE, 0&, 0&)
TCS_MULTILINE is a control style and no message. If you want to check
whether it is set, you would have to use something like this:
Dim style As Long
style = GetWindowLong(hwndCtrl, GWL_STYLE)
If style And TCS_MULTILINE Then
Debug.Print "Control uses TCS_MULTILINE!"
End If
And if you want to set this style, do it like this:
Dim style As Long
style = GetWindowLong(hwndCtrl, GWL_STYLE)
style = style Or TCS_MULTILINE
SetWindowLong hwndCtrl, GWL_STYLE, style
Timo
--
www.TimoSoft-Software.de - the home of ExplorerTreeView
Boycott DRM! Boycott HDCP!