Creating a Floating Macro Button

by Allen Wyatt
(last updated June 30, 2018)

2

Leah would like a floating button with a macro assigned. So, as she moves left, right, up, or down, the button stays near the cell on which she is working. Leah wonders if there is a way to add such a button in Excel.

There is not a way to do this without using a macro to control the placement of the button. (This shouldn't be a big problem as you are already using at least one macro in the workbook—the one that the floating button triggers.)

Before getting into the specifics of how to do this, you'll want to consider if you really want to use this approach. For instance, you could assign your macro to a shortcut key or to a button on the Quick Access Toolbar. Either approach would remove the need to constantly reposition your floating button.

If you definitely want to go the button route, then go ahead and create your on-screen button and link it to your macro. Then, simply create an event handler that repositions the button every time you change the selected cell. For instance, let's assume that the name of your button is "Button 1". In that case, you could use the following macro:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With ActiveSheet.Shapes("Button 1")
        .Top = Target.Offset(1).Top
        .Left = Target.Offset(, 1).Left
    End With
End Sub

Remember that this is an event handler, so it needs to be placed in the code window for the worksheet to which it applies. It results in the button being moved to always be near the bottom-right corner of the selected cell.

It should also be noted that there are two ways you can create a macro button—either as an Active X control or as a legacy, non-Active X control. The above approach works great if you are using the legacy type of button. If, however, you are using an Active X control, then you'll want to change the macro just a bit:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With ActiveSheet.OLEObjects("CommandButton1")
        .Top = Target.Offset(1).Top
        .Left = Target.Offset(, 1).Left
    End With
End Sub

Note that the only change is in the object being referred to. With the appropriate event handler in place, whenever you change the cell selected on the screen, the button repositions to be just to the bottom-right of the selected cell. Thus, it isn't a true "floating" button that hovers in the same spot all the time. This should be OK in Leah's situation, since she wanted the button to be near the cell in which she is working (the selected cell), not the cell she is viewing (such as when she scrolls doing using the scroll bars).

Note:

If you would like to know how to use the macros described on this page (or on any other page on the ExcelTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (13544) applies to Microsoft Excel 2007, 2010, 2013, and 2016.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Tab Key Won't Move from Cell to Cell in Locked Worksheet

Normally the Tab key can be used to move from one cell to another in Excel. If this cell movement doesn't work for you, ...

Discover More

Creating Add-Ins

Want to create your own add-in? Excel makes it easy to do. Here are all the steps you need.

Discover More

Adding Up Tops and Bottoms

When you are working with sequenced values in a list, you’ll often want to take some action based on the top X or ...

Discover More

Comprehensive VBA Guide Visual Basic for Applications (VBA) is the language used for writing macros in all Office programs. This complete guide shows both professionals and novices how to master VBA in order to customize the entire Office suite for their needs. Check out Mastering VBA for Office 2010 today!

More ExcelTips (ribbon)

Determining How Many Windows are Open

Does your macro need to know how many windows Excel has open? You can determine it by using the Count property of the ...

Discover More

Testing if a Workbook is Open

Your macros can easily open and manipulate other Excel workbooks. If a workbook you are trying to use is already in use ...

Discover More

Determining an Integer Value

When creating macros, you often need to process numbers in various ways. VBA allows you to convert a numeric value to an ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 8 - 1?

2018-07-04 04:18:42

Ken Varley

UPDATE ON PREVIOUS COMMENT:

Closed workbook after it didn't work. Re-opened workbook next day, and it was working.

Must be the MS fairy godmother looking over me !!!


2018-07-02 06:07:49

Ken Varley

Didn't work for me

I thought that I would give it a try. Inserted an activeX button (CommandButton1).
Copied code into worksheet.

Tried making entries in different cells

Nothing happens


This Site

Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.