Change the display of an Excel spreadsheet with merged cells

Question

This my situation:

The are script or command to make the cells (those combined) graphically equal to those looking in the image, not disunite the cells?

Answer 1

Something like this:

Sub ChangeDisplay
    Rows("1:1").RowHeight = 250
    Columns("A:A").ColumnWidth = 90
end sub

Or what exactly?