Resizing checkboxes using vba

So I am having difficulty resizing some form control checkboxes using vba. I recorded a macro and used the resulting code, but I keep getting an error. Here is the code:

Sheet46.Shapes.SelectAll  'this selects the checkboxes properly
Selection.ShapeRange.ScaleHeight 1.1666666667, msoFalse, msoScaleFromTopLeft   'this is the code I inserted from the macro, but I get a 438 error (object does not support...)

Any thoughts?

Perfect! Thank you!