Bob -
You can't change the default measurement system for column width, but
you can use a simple macro to convert inches to characters, and adjust
cell sizes this way. This macro changes the worksheet to an array of
2-inch square cells.
Sub TwoInchSquareCells()
Dim i As Integer
For i = 1 To 4
With ActiveSheet
.Cells.RowHeight = 144
.Cells.ColumnWidth = _
.Cells(1, 1).ColumnWidth * 144 / .Cells(1, 1).Width
End With
Next
End Sub
- Jon
