Increase checkbox/radiobutton cells in Excel/VB Macro

I have print button in my excel and when click on that want to increase font size of all cells. so, I used the following :

For Each Cell In Worksheets("Amount List").UsedRange.Cells
    Cell.Font.Size = Cell.Font.Size + 4
Sheet1.Shapes("Option Button 614").ControlFormat.Value //option button
//Sheet1.Shapes(CStr("Check Box " & checkBoxNum)).ControlFormat.Value = xlOn

It increase the font af all cells, but there is misalignment of checkbox, radio button cells. I want to increase that cells size too. How can achieve this? Can you help me.. Thanks in advance