Changing right-click mini toolbar

Posted on 2009-02-14
Last Modified: 2012-05-06
I'm wondering if there is a way to change the mini toolbar in Word 2007 that pops up just above the context menu using VBA.  For instance, as I posted in a related question, I use the following code to create an underline button within the right-click context menu.  It would be even better if I could place this button in the mini toolbar.

Sub Addunderline()
    Dim cb As CommandBar
    Dim c As CommandBarButton
    Set cb = Application.CommandBars("Text")
    Set c = cb.FindControl(, , "VBAxUnderline")
    If c Is Nothing Then
        Set c = cb.Controls.Add(msoControlButton, 115, , 5, True)
        With c
            .Caption = "&Underline"
            .Style = msoButtonIconAndCaption
            .TooltipText = "Underline"
            .Tag = "VBAxUnderline"
        End With
    End If
End Sub
Question by:hsrstud
    1 Comment

    Accepted Solution

    I've come to realize this is not possible.  Too bad.

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    Do You Know the 4 Main Threat Actor Types?

    Do you know the main threat actor types? Most attackers fall into one of four categories, each with their own favored tactics, techniques, and procedures.

    This article will show you how to use shortcut menus in the Access run-time environment.
    This article will guide you to convert a grid from a picture into Excel format using Microsoft OneNote and no other 3rd party application.
    The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
    Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

    760 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    11 Experts available now in Live!

    Get 1:1 Help Now