You can try a macro like this one:
Sub Transpose3Line()
'stop at the first blank row
While ActiveCell < ""
'move contents of next 2 down over on this row
ActiveCell.Offset(0, 1).Formula = ActiveCell.Offset(1, 0).Formula
ActiveCell.Offset(0, 2).Formula = ActiveCell.Offset(2, 0).Formula
'move down one
ActiveCell.Offset(1, 0).Select
'delete two empty rows
Selection.EntireRow.Delete
Selection.EntireRow.Delete
Wend
End Sub

Note that rows are being deleted by this; if there is stuff in other
columns it will be destroyed. If you do have data in other columns you
can replace the 2 "Selection.EntireRow.Delete" lines with
"Selection.Delete Shift:=xlUp" instead.

On Jun 6, 12:38 pm, JG wrote:
I don't think I explained it right. The values are different in each cell.

A
1 Name
2 Address
3 Phone
4 Name
5 Address
6 Phone

A B C
Name Address Phone
Name Address Phone

I use the transpose special for the first three, but I don't know how to do
it for the rest w/o doing it three at-a-time.

Thx. JG

"Imonit" wrote:
Hello there.

If I'm reading you correctly then you do want to try and transpose
your information by selecting it, cut or copy it, then select where
you want it to go, then right click that cell and choose the paste
special option, then check on the Transpose option and VIOLA!

And then you can use your autofill handle.

Did that help?

-Imonit

On Jun 6, 11:58 am, JG wrote:
I have worksheet like this:

A
B
C
A
B
C

That I need to look like this:

ABC
ABC

In both, each letter is in its own cell.

Is there one forumula that I can use to do all-at-once or do I need to do
each set (ABC) individually?

Thanks, JG