Oops! I forgot to take out my message box line!

delete:
MsgBox (ActiveSheet.Range("A1").Offset(k, 0).Address)

It was part of my testing phase. :)

"mjmcevoy" wrote:

Nope. First column contains the customer names. over 100 customers.

Then the rest of the columes contain account numbers that pretain to each
customer. No blank columns in between

"StumpedAgain" wrote:

Is there a column between Customer X and the first number? Are there any
empty columns between the numbers?

"mjmcevoy" wrote:

I need to convert

Customer B 1457895 1248875 45345345 45345434
Customer X 6548464 6549846 68462184 6548414 6354654


to

Customer B 1457895
Customer B 1248875
Customer B 45345345
Customer B 45345434
Customer X 6548464
Customer X 6549846
Customer X 68462184
Customer X 6548414
Customer X 6354654

It is several lines ad as many as 225 columns per line.

Any help is appreciated.