Row height to compare with non-Excel files

P

Patricia Shannon

I'm putting this in the New Users section, because it will probably be
obvious to experienced users, but when I finally figured it out, it was of
enormous help to me.

I have a bunch of spreadsheets that are being used as a database. When
comparing the data in the spreadsheets to the original data, I had a hard
time because the spreadsheet rows didn't correspond in size to the original
data. I tried adjusting the font sizes in both, but couldn't get the rows to
line up.
I finally found that the thing to do is to set the Height of the spreadsheet
row to the font size of the other file. Then the font size can be 1 less for
ease of reading it. I found that the Distributed orientation worked best.
Note that font sizes are specified as the height in points. There are 72
points in an inch.
This is part of a macro that sets up my files for reviewing.

Sub D1FormatForReview()
'
' Macro recorded 3/29/2006 by Patricia Shannon

Cells.Select
With Selection
With .Font
.Name = "Courier New"
.Size = D1FontSize - 1
End With
.RowHeight = D1FontSize
.VerticalAlignment = xlDistributed
.ShrinkToFit = False
End With

Cells.Select
Selection.Columns.AutoFit

Columns("B:D").Select
Selection.EntireColumn.Hidden = True

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top