eliminate words

[hktom]

dear sir

could u please kindly help and how to write the vba code
we have thousand data change like that

questions answer
ab: 350 cd: 6 2015-07-20efgh 350 6 20/7/2015
cd: 510 rt: 1 510 1
cd: 510 rt: 1 510 1
cd: 510 rt: 2 510 2

pls kindly find attached file and help

Thanks
Tom

[Rioran]

Hello, Tom!

Look at the attachment. Is it what were expected?

Please Login or Register  to view this content.

[Ed_Collins]

Does this help?

Use this formula for the first column of data: =MID(k2,5, 7)
Use this formula for the second column of data: =MID(l2,5, 7)
Use this formula for the third column of data: =MID(m2,6,2) &"/" & MID(m2,9,2) &"/" & MID(m2,1,4)

Assumes your data is in the k, l, and m columns, as in your spreadsheet.

Copy and paste these formulas for all required rows.

[FDibbins]

Rioran, nice formula

It doesnt work for the date though, so try this 1 for the date...
=IF(M2="","",DATEVALUE(LEFT(M2,10)))
formatted as date

[Parth007]

HihkTom,

you can try below 2 code's in module..

Please Login or Register  to view this content.

OR

Please Login or Register  to view this content.

[daffodil11]

This kills A-Z, spaces, and colons.

Please Login or Register  to view this content.

[Rioran]

FDibbins, hello! Thanks for notifying about formula, but I just didn't add it to the list. Though it's still in the attached file.