Turns out I didn't need anything too fancy, seems like VBA is happy enough with me forcing a date format like this
Code:
DOR = oXL.ActiveWorkbook.Worksheets("Docvariables").Range("E3").Value
DOR = Format(DOR, "dd/mm/yyyy")
ActiveDocument.Variables("DOR").Value = DOR