VBA to find out Height above first row?

Please Login or Register  to view this content.

When workbook opens, the excel maximizes. I have tested the code line by line, and it does not work as I like. I think (Application.Height / 2) - (40 / 2) is the distance from B, not A. So the correct code should be Activesheet.Shapes("CommandButton1").Top = (Application.Height / 2) - (40 / 2) - h

But how can I compute h?

I would like to put the command button in the center of screen.

Thanks.

h.jpg

Thanks. I think replacing h with Application.CommandBars("Ribbon").Height works fine.

That makes the button in the center of Excel window (including ribbon). I do mean in the center of Excel, not the center of screen. At least, it looks in the very center now.

Thanks again.

Its probably my feeble mind but I'm not certain what you mean by replacing h.

Can you show me the amended code with your changes ? Curious.

Thanks.