Hi Folks,

Thanks to all who replied. All the suggested solutions worked, but I stumbled across a simpler solution, just place the formatting command before the cell is filled, ie.

oWorkSheet.Cells(lnRow,5).NumberFormat = 'dd/mm/yy'
oWorkSheet.Cells(lnRow,5).value = MyDateField

Strange, but it works!

Thanks,
Alan