Change font size on command buttons with VBA

I have an issue with my command buttons automatically changing size when using multiple screens with different resolutions.

The solution I have found with the buttons is to include this code to the end of the botton click routine, but the font sometimes changes. So now I need the code to reset the font size

Please Login or Register  to view this content.

The code hangs up on the last row and returns the error

Run-time error '438'
Object doesnt support this property or method.

any hints?

Hi,

There is nothing wrong with your code, and it works fine on my computer (also running Excel 2010). Could you please upload your workbook with the error so that I can attempt to replicate your issue in your workbook before trying to solve it.

Thanks

botton sizes.xlsm

Sorry for the delay file attached

Originally Posted by ajryan88

Hi,

There is nothing wrong with your code, and it works fine on my computer (also running Excel 2010). Could you please upload your workbook with the error so that I can attempt to replicate your issue in your workbook before trying to solve it.

Thanks

file posted above thanks in advance

try so

Please Login or Register  to view this content.

Originally Posted by nilem

try so

Please Login or Register  to view this content.

Thanks
that works great.

Now comes the next question which is related to OLEObject
If I had 20 buttons on a sheet how can i determine the number of each of them without running this code and seeing which button changes

You can do so by looping through all objects and e.g. change it if objectname matches:

Please Login or Register  to view this content.