Mike

I tested my previous effort with more data and it was
rubish. This is the amended macro tested on 100 lines of
data.

I suggest that you enter Headings (Customer, Address etc)
in columns B to F two rows above the the first record.

Select the racords and run the macro.

I got an error running Cecilkumaara's programm.

Regards
Peter
-----Original Message-----
Hello, I have a fairly huge excel file in this format:

1 Bob Smith
2 123 fair lane
3 toledo, oh 12345-1234
4 Phone: (123) 456-4567
5 Fax: (123) 456-2345
6
7
8 Bob Smith
9 123 fair lane
10 toledo, oh 12345-1234
11 Phone: (123) 456-4567
12
13 Bob Smith
14 VP of nothing
15 123 fair lane
16 toledo, oh 12345-1234
17 Phone: (123) 456-4567

and on and on.

what I need is a macro that:
starts at A1
selects the range A1:A6 (whatever it's size)
copies it
moves to B1
paste:transpose
deletes rows 2-7

and runs again...

I'm stumped I've seen some offset stuff, but the
selection fo the
range baffles me.

some data is only 4 rows some is 12 rows. I can handle
moving the
data into the appropriate columns after this step is
done, unless
someone has an idea of putting phone and fax into
appropriate columns
(because they always begin with phone or fax), or @
symbol for e-mail
or , & - for city state zip.

any help would be appreciated.
.