Completing the Square aka The "Most" Squares Method

Now that I actually have some traffic to this blog, it’s probably time I started adding posts.

A while ago, I was wondering how to make the cells in Excel exactly square, like the squares on graph paper.  I came across this post from Mr. Excel.  I wasn’t in love with his solution because it requires users to first find their desired width by dragging a column, then writing it down (keep in mind it’s in pixels, so you might not have an easy round number), and then entering it into an input box.

So, without further ado, I present my solution that doesn’t require you to write anything down:

Private Sub AutoSize()

    Dim cels As Range
    Set cels = Me.Cells
 
    cels.ColumnWidth = 1  'Adjust me
    cels.RowHeight = cels(1, 1).width
 
    Set cels = Nothing

End Sub

To get different sized squares, simply adjust your ColumnWidth.  For further reading, checkout why widths in Excel are so tricky.

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s