Shape Moving

[mudflap]

I have a macro assigned to a shape and I would like it to follow the page as I scroll down is this possible?

Thanks

 

[My Aswer Is This]

Try this:

This script will follow the active cell.
So when you click on a cell the shape will be next to the active cell.

This is an auto sheet event script
Your Workbook must be Macro enabled
To install this code:
Right-click on the sheet tab
Select View Code from the pop-up context menu
Paste the code in the VBA edit window

I named my shape MY_Shape.
Modify name to your needs.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Modified  11/16/2018  7:29:50 AM  EST
Shapes("My_Shape").Top = ActiveCell.Top
Shapes("My_Shape").Left = ActiveCell.Offset(, 1).Left
End Sub

 

[mudflap]

Thank you for the help.

 

[My Aswer Is This]

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

Thank you for the help.

 

[mudflap]

Is it possible to put this code in my Persional.XLSB so it will automatically run on all of my workbooks? I have a lot of worksheets in each workbook and i don't want to have to put this code in each sheet.

Thanks

 

[My Aswer Is This]

No. As far as I know a sheet selection change event cannot be installed in the Personal Workbook.

Tell me what do you do with this shape. Do you have a script assigned to this shape.

I may have another way we could do this. Is your whole ideal to have this button close by so you can click it to run a script?

If so post the script here.

 

[My Aswer Is This]

Now that I look at your original post again I see you have a script assigned to the shape.

Why not run the script with a shortcut key. Then this script could be installed in the Personal Workbook and could be run in any sheet or workbook.

 

[mudflap]

I cant seem to get that to work.

I think some thing needs to be charged in the code in order for it to work. I will keep trying otherwise ill just start putting the code in each sheet.

Thank you for the help.

 

[My Aswer Is This]

Not sure what your saying. I asked what is your script in the shape doing. I said show me your script. And you did not answer my question.

I cant seem to get that to work.

I think some thing needs to be charged in the code in order for it to work. I will keep trying otherwise ill just start putting the code in each sheet.

Thank you for the help.

 

[mudflap]

Sorry I was replying to the message after that one. Im not sure how to post my code.