Find value in cells and copy part of it to other column

[abjac]

Hi I have a work sheet, where i open a txt file up in excel sheet 2.( Have worked with it deleted spaces etc., with a macro)
All text are in column A.
What i need is to find all the words/numbers which start with R00 and copy this and the next 5 digits(8 total)
to the same row but in column B. If it can highlight the row A and B where it copy from it would be fine.
It normally looks like this R0037483000000000098928 and have to be displayed in column B same row as this R0037483 First 8 digits.
After it have found this i just need all the 8 digits numbers to be copied to column C but with no space between.

I have uploaded a test sheet, so you can see what i would like to have.

Please have a look, hope some can help.

Sincerely
Abjac

[HaHoBe]

Hi, Abjac ,

find the solution for formulas in the attached workbook.

Using VBA it could look like this:

Please Login or Register  to view this content.

Ciao,
Holger

[abjac]

Hi Holger and thanks for the brilliant code.
I have now tried it and tested it in the big file and it works just perfect.
So another brilliant code from you.
Thanks allot its really a big help

Sincerely
Abjac