About Us

Britt3

This helped me tremensously!

Thank you!

"Gord Dibben" wrote:

Enter this formula in B1.

=INDEX($A:$A,(ROWS($1:1)-1)*5+COLUMNS($A:B)-1)

Copy across to F1

Select B1:F1 and copy down until you get zeros.

Select all and(in place)copypaste specialvaluesokesc

Or use this macro..........

Sub ColtoRows()
Dim rng As Range
Dim I As Long
Dim J As Long
Set rng = Cells(Rows.Count, 1).End(xlUp)
J = 1
On Error Resume Next
nocols = 5 'or use InputBox("Enter Number of Columns Desired")
For I = 1 To rng.Row Step nocols
Cells(J, "A").Resize(1, nocols).Value = _
Application.Transpose(Cells(I, "A") _
.Resize(nocols, 1))
J = J + 1
Next
Range(Cells(J, "A"), Cells(rng.Row, "A")).ClearContents
Exit Sub
End Sub

Gord Dibben MS Excel MVP

On Tue, 4 Nov 2008 17:37:00 -0800, Britt3
wrote:

I have a spreadsheet that displays my customer data in rows like a mailing
label.
1 Customer name
2 Customer Address
3 City, State Zip
4
5
6 Customer Name
7 Customer Address
8 City State Zip
9
10

All the data is in one column and the data format repeats every 6th row. So
I have five rows of name and address data for one entry then five more rows
of data for the next entry and so on. How can I reformat data into columns
for mail merging or print to mailing labels using the current layout?

Britt3

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Changing Mailing labels from rows to columns	lucrezia	Excel Worksheet Functions	4	October 20th 06 02:45 AM
Printing Mailing labels...already have full address in each cell	Greg	Excel Discussion (Misc queries)	4	May 17th 06 10:35 PM
Printing mailing labels	Nick	Excel Discussion (Misc queries)	2	April 4th 06 05:25 AM
How do I get data list to print mailing labels?	John Nichols	Excel Discussion (Misc queries)	1	December 15th 05 04:19 PM
how do i convert MS Word mailing labels into an Excel mailing lis.	unrhyll	Excel Discussion (Misc queries)	1	February 4th 05 12:19 AM

Menu

About Us