Scroll Bar Maximum Value based on a Cell Value

[UWBadger]

I want users of a spreadsheet to be able to set the maximum value on various scroll bars. I am trying the following VBA code (see below) to enable this but it is not working. I am getting the following error:
"Run-time error '438': Object doesn't support this property or method"

Is this an Excel for Mac problem?

Please Login or Register  to view this content.

[jolivanes]

Which is "Scrollbar21"?

Do you want to set one direction only?

This works on a Windows computer.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

[UWBadger]

Hi jolivanes, I do not understand your reply. "Scrollbar21" is the name of one of the many scroll bar form controls I have inserted in my sheet. See attached image.

Screen Shot 2019-12-19 at 4.42.55 PM.png

[protonLeah]

ActiveSheet.Scrollbar21.ControlFormat.Max = Range("R2").Value

[UWBadger]

Thanks for the suggestion. I inserted your code (as below) but am still getting the same error message: "Run-time error '438': Object doesn't support this property or method"
I'm using Excel for Mac. Could this be an unsupported feature on a Mac?

Please Login or Register  to view this content.

[jolivanes]

For a FormsControl Scrollbar.

Please Login or Register  to view this content.

[UWBadger]

Thanks again for trying to help, jolivanes, but I want the user of this sheet to set the maximum for a given FormsControl Scrollbar by inputting a number in a specific cell. I have found several solutions by searching online forums ...and it seems that most people have found a solution...but I remain vexed.

[jolivanes]

Do you mean to say that when you change

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

it does not work while without chances it does work?

[UWBadger]

I hadn't tried your suggested code because it did not appear that it would achieve my goal. I just tried the following which did not work:

Please Login or Register  to view this content.