Distribute Columns Evenly

  • Thread starter Thread starter Galen W. Sievert, PC, MS Ed.
  • Start date Start date
Frank,
Drats! Will have to do it the old fashion way. : (

Thanks for your reply!

--
Galen W. Sievert

Frank Kabel said:
Hi
AFAIK this option is not available in Excel
 
One way (using a macro):

Public Sub DistributeColumnsEvenly()
Dim dSum As Double
Dim rCell As Range
With Selection
For Each rCell In .Rows(1).Cells
Debug.Print dSum, rCell.ColumnWidth
dSum = dSum + rCell.ColumnWidth
Next rCell
.ColumnWidth = dSum / .Columns.Count
End With
End Sub


If you're unfamiliar with macros, see David McRitchie's "Getting Started
with Macros"

http://www.mvps.org/dmcritchie/excel/getstarted.htm
 
Hi,
How do I? This is available in Word/Tables.
Thank you
HI

The nontechie way is to set up your preferences on a worksheet with your
choice of column, font, etc. Then just use it as a template.

bye

Darlene
 
Back
Top