Hi Jason
some questions:
- How do you indentify a new column. That is why do you insert '125'
and 'D' in column A.
- Does the source data has a amximumn column number or how do you
identify the last column (the last non-blank?)

So you may explain the underlying algorithm for this with a little bit
more detail :-)
Otherwise this macro would be quite straightforward.

--
Regards
Frank Kabel
Frankfurt, Germany

Stuart wrote:
After using the Text Import wizard, the bulk of the data is
in an acceptable format, but I'm left with this type of data,
split across columns:

In A2: 126 Prices for Meas
B2: sured Work
C2: s - Major W
D2: orks
A3: D G
B3: ROUNDWORKS

Corrected, the result is:

A B
2 126 Prices for Measured Works - Major Works
3 D GROUNDWORKS

I can locate these records using
If IsNumeric(Left(C.Value, 4)) Then
but I don't know how to proceed further.

Any pointers would be much appreciated.

Regards.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.596 / Virus Database: 379 - Release Date: 26/02/2004