In questo modo permette di mettere la cella in Formato data

codice:
objWS.Columns(1).NumberFormat = "dd/mm/yyyy"