essaie ca
strSQL = "INSERT INTO WORKDAY(IDTASK,DATEDAY,NBHOURS,IDEMP)VALUES(11, (" & NewDate & " ),6,3)"
ou ca
strSQL = "INSERT INTO WORKDAY(IDTASK,DATEDAY,NBHOURS,IDEMP)VALUES('11', (getdate()),'6','3')"
ou getdate est la fonction date (sous sql server)