Macro to update button names won't translate from windows to Mac

janehancock

New Member
Joined
Jan 31, 2021
Messages
2
Office Version
  1. 365
Platform
  1. Windows
I have designed a macro that copies the name of a button on sheet 1 to a corresponding button on 7 other sheets. It works well on windows but on a Mac it just blanks out the button. Can anyone help


VBA Code:
  ActiveSheet.Shapes.Range(Array("Button 36")).Select
    Selection.Characters.Text = Sheets("WorkFlow").Shapes("Button 36").AlternativeText
    With Selection.Characters(Start:=1, Length:=3).Font
        .Name = "Abadi"
        .FontStyle = "Italic"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = 11
    End With
    Sheets("Episode 2").Select
    ActiveSheet.Shapes.Range(Array("Button 19")).Select
    Selection.Characters.Text = Sheets("WorkFlow").Shapes("Button 36").AlternativeText
    With Selection.Characters(Start:=1, Length:=3).Font
        .Name = "Abadi"
        .FontStyle = "Italic"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = 11
    End With

Here I have dargged accross the said buttons and made a mini sheet, does this mean anything???

Wounded Buffalo Project Mangement Template (2)2.xltm
MNOPQRST
2
3
4
5
Workflow
 

Attachments

  • Picture1.png
    Picture1.png
    120 KB · Views: 7
Last edited by a moderator:

Excel Facts

Control Word Wrap
Press Alt+Enter to move to a new row in a cell. Lets you control where the words wrap.

Watch MrExcel Video

Forum statistics

Threads
1,130,169
Messages
5,640,547
Members
417,151
Latest member
ChickenTenderer

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top