"pc300d" wrote in
message ...

Sorry to be pain

You're not being a pain, it me that's being a pain - I changed the x
variable to a 1 to run a test and forgot to change it back again before
posting.

change:
Cells(x * Bcol - Bcol + y, 3).Value = _
Right("0000" & Cells(1, 1).Value, 4) _
& Cells(y, 2).Value

to:
Cells(x * Bcol - Bcol + y, 3).Value = _
Right("0000" & Cells(x, 1).Value, 4) _
& Cells(y, 2).Value

and it should work as you want.

--
HTH

Sandy
In Perth, the ancient capital of Scotland


with @tiscali.co.uk


"pc300d" wrote in
message ...

Thank you for your time Sandy, we're very nearly there !

The macro is hard for me to understand, as I said before I'm fairly new
to all this, so I don't know which "bit" needs tweaking.

Once the macro is run the resulting column (column C) is "parsed" with
the 19 cells in column B which is perfect, but the prefix is always
cell A1.

ie. as in my previous posts, column C has 0001 as the 1st 4 digits in
every cell (all 9000 of 'em) so the macro isn't stepping down column
A.

Sorry to be pain but if this works it will save me an enormous amount
of time in the future.

Many thanks


--
pc300d
------------------------------------------------------------------------
pc300d's Profile:
http://www.excelforum.com/member.php...o&userid=33474
View this thread: http://www.excelforum.com/showthread...hreadid=532785