Je ne connais pas la finalité de ton code, mais ce que je te propose rend le contenu de ta textbox "ressemblant à une date", mais ça n'est pas une date valide pour Excel, qui n'y verra que du texte...
Me.txtdatedemande = Format(Me.Listedemandecoc.Column(3, Numligne), "dd/mm/yyyy")