making 2 columns

[jwrma]

I have info in a document that is more than one page long. Is it possible to
make two columns on one page. I would like to keep all of the information on
one side of one sheet of paper.

 

[FSt1]

hi
not with any standard built in print function. but you can manipulate the
data.
see this site for details.
http://www.mvps.org/dmcritchie/excel/snakecol.htm

regards
FSt1

 

[Gord Dibben]

Public Sub SplitToCols()
Dim NumCols As Integer
Dim I As Integer
Dim colsize As Long
On Error GoTo fileerror

NumCols = InputBox("Choose Final Number of Columns")
colsize = Int((ActiveSheet.UsedRange.Rows.Count + _
(NumCols - 1)) / NumCols)
For I = 2 To NumCols
Cells((I - 1) * colsize + 1, 1).Resize(colsize, 1).Copy Cells(1, I)
Next I
Range(Cells(colsize + 1, 1), Cells(Rows.Count, 1)).Clear
fileerror:
End Sub


Gord Dibben MS Excel MVP