To change Date format in a disorderly column

[snb]

If you analyse the code and understand how it works it's easy to amend.

Sub M_snb()
      [K2:K200] = [if(B2:B200="","",if(isnumber(B2:B200),date(substitute(mid(B2:B200,search("/",B2:B200)+1,2),"/",""),right(trim(B2:B200),4),substitute(left(substitute(B2:B200,"`",""),2),"/",""),date(right(trim(B2:B200),4),substitute(mid(B2:B200,search("/",B2:B200)+1,2),"/",""),substitute(left(substitute(B2:B200,"`",""),2),"/",""))))]
End Sub

[pmich]

snb,
Thanks for taking time to reply me with your code. I do appreciate. The codes given by p45cal did the job.
I may use the logic in your code, for some other purpose. Yes, no effort will go waste. I am learning and your code helps. Thanks.