date - 通过 excel vba 在 MS 访问中插入小时和日期

Question

我正在尝试通过 vba excel 将此数据插入 MS Access，但我一直收到错误消息

    dates = Cells(4, "E").Value ' contains 9/11/2013 '
    hours= "7:30"
connDB.Execute "INSERT INTO DeptOrder (IDDept, DateIntervention, HourIntervention, bilaterale) VALUES (4,  "& #dates# &" , "&hours&" , true)"

这是我查询的最新版本。错误消息是“条件表达式中的数据类型不匹配”。

INSERT INTO DeptCommande
(IDDept, IDIntervention, DateIntervention, HeureIntervention, bilatérale, IDChirurgien, NumSalle)
VALUES ('5' , '574', #09-10-2013#, '0.322916666666667', 'True', '1', '4')

Answer 1

谢谢汉化！！！我确实删除了所有不必要的引号，它终于起作用了。很抱歉，我想通过仅添加一些变量来发布一个简短的问题。

VALUES (" & ledept & " , " & lintervention & ", #" & ladate & "#, " & heurevoulue & ", " & bilat & ", " & nomchiru & ", " & numeroSalle & ")" Debug.Print strInsert

VALUES (5 , 574, #10-11-2014#, 0.322916666666667, True, 1, 4)