How can I easily make cells in Excel that are square?

[Todd]

Seems such a simple request, but I cannot find a simple answer.

[Max]

"Todd" wrote:
... How can I easily make cells in Excel that are square?
> Seems such a simple request, but I cannot find a simple answer.

Try the response by PaulB in this thread:
http://tinyurl.com/8ytqu
where he posts a sub MakeSquare for the purpose
(sub is pasted below for easy ref)

Steps
--------
Select the range (or try selecting entire sheet)
Run the sub by pressing Alt+F8,
select "MakeSquare" in the Macro dialog, click Run
Answer the inputbox by entering say: 0.1, 0.1
then click OK
When the sub completes, you'd get the result !

'----- sub posted by Paul B ---
Sub MakeSquare()
Application.ScreenUpdating = False
Dim WPChar As Double
Dim DInch As Double
Dim Temp As String

Temp = InputBox("Height and width in inches?")
DInch = Val(Temp)
If DInch > 0 And DInch < 2.5 Then
For Each c In ActiveWindow.RangeSelection.Columns
WPChar = c.Width / c.ColumnWidth
c.ColumnWidth = ((DInch * 72) / WPChar)
Next c
For Each r In ActiveWindow.RangeSelection.Rows
r.RowHeight = (DInch * 72)
Next r
End If
Application.ScreenUpdating = True
End Sub
'------------
--
Max
Singapore
http://savefile.com/projects/236895
xdemechanik
---

[JEV]

select all;
format; row height set to 72 pts
column width set to 12 pts

displys cells 1" by 1"



"Todd" wrote:

> Seems such a simple request, but I cannot find a simple answer.

[Alan Beban]

How do you propose setting the column width to 12 points???

Alan Beban

JEV wrote:
> select all;
> format; row height set to 72 pts
> column width set to 12 pts
>
> displys cells 1" by 1"
>
>
>
> "Todd" wrote:
>
>> Seems such a simple request, but I cannot find a simple answer.

[JE McGimpsey]

If you can get your hands on a Mac, XL2004 by default allows you to set
row height and column width in inches/centimeters.

In article <[email protected]>,
Todd <[email protected]> wrote:

> Seems such a simple request, but I cannot find a simple answer.