Solved: VBA code to select a specific tab

Hi,

A 3rd-party program is using the Mail Merge to merge data into a Word-document. When this is done, Word is showing the document with the Mailings-tab.

I would like Word to show the Home-tab - as the Mail Merge is over and done at this time.

I have tried this:
<tab idMso="TabMailings" getVisible="rxtabMsoMailings_GetVisible"/>

and the VBA:
Sub rxtabMsoMailings_GetVisible(control As IRibbonControl, ByRef returnedVal)
returnedVal=False
End sub

But this will hide the Mailings-tab. Does anyone know if there is a "getSelected" argument or another way to select the Home-tab?

Thanks

Eva

I also have had a need to control tab focus in a Word 2007 VBA application. It appears there is no actual command to do this, from what I have researched. I have tried to use (from inside a VBA macro) the command: sendkeys("%H") for example, , to revert to the home tab, but it does not always work, only sometimes. Cindi Meister Microsoft MVP told me of the sendkeys trick.

http://forums.microsoft.com/MSDN/Sho...63291&SiteID=1

Good luck, please let me know if you find a better way!

Hi there,

As Microsoft gave us no way to programatically activate tabs, sendkeys is our only option (unfortunately). Give this a try:

[vba]Sub ActivateHomeTab()
WordBasic.SendKeys "%H%"
End Sub[/vba]
It's going to send ALT + H + ALT to the active window. So if you want it to work, the main app needs focus.

I.e. if your user clicks somewhere mid stride and takes focus, it may not complete. If a userform has focus, it may not work, if... you get the idea.

We actually cover this topic, (although using Application.Sendkeys for Excel,) as well as enabling and repurposing controls in RibbonX - Customizing the Office 2007 Ribbon starting on page 404.

HTH,

Thanks a lot - that was just what I was looking for :bow:

There is, at least, one way to do this - using Accessibility.

I have just written up a brief web page on it, with a demonstation Word template available for download:

http://www.wordarticles.com/Shorts/R...bonVBADemo.htm

Thanks Tony. I'll have to dig into that when I've got a bit of time. :)

How do I get this to work with Excel instead?