ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   column wrapping (https://www.excelbanter.com/excel-discussion-misc-queries/104813-column-wrapping.html)

susanculbertson

column wrapping
 
is it possible in office 2003 - excel to wrap the columns?

explanation:
i have a spreadsheet that has over 1000 rows in one column... i want to be
able to create a break (per se) every 150 (for instance) rows and create a
new column. (headers arent necessary in this.)

Any comments/questions are welcomed.

Niek Otten

column wrapping
 
Maybe not exactly what you require, but have a look he

http://www.mvps.org/dmcritchie/excel/snakecol.htm

--
Kind regards,

Niek Otten
Microsoft MVP - Excel

"susanculbertson" wrote in message
...
| is it possible in office 2003 - excel to wrap the columns?
|
| explanation:
| i have a spreadsheet that has over 1000 rows in one column... i want to be
| able to create a break (per se) every 150 (for instance) rows and create a
| new column. (headers arent necessary in this.)
|
| Any comments/questions are welcomed.



Gord Dibben

column wrapping
 
With a macro.

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

On Mon, 14 Aug 2006 05:21:02 -0700, susanculbertson
wrote:

is it possible in office 2003 - excel to wrap the columns?

explanation:
i have a spreadsheet that has over 1000 rows in one column... i want to be
able to create a break (per se) every 150 (for instance) rows and create a
new column. (headers arent necessary in this.)

Any comments/questions are welcomed.




All times are GMT +1. The time now is 12:27 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com