VBA 'Datatype Mismatch in query expression' 查询 SharePoint 列表时

VBA 'Datatype Mismatch in query expression' when querying SharePoint List

我能够使用 VBA 成功查询我的共享点列表。但是,在添加日期条件时出现数据类型不匹配错误。 我正在尝试查询大于或等于当前年份的所有日期。

sharepoint 列表有一个日期列,格式为 "short date",下面是 VBA 代码。

感谢有人用正确的语法帮助我。

我尝试了以下无效的查询:

'r = DateSerial(Year(Date), 1, 1)
sSQL = "SELECT [fullname] FROM [listname] WHERE [Holiday Date] >= '" & Format(DateValue(r), "m/d/yyy") & "'"

sSQL = "SELECT [fullname] FROM [listname] WHERE [Holiday Date] >= '" & DateValue("1/1/2019")") & "'"

sSQL = "SELECT [fullname] FROM [listname] WHERE [Holiday Date] >= '" & DateSerial(Year(Date), 1, 1) & "'"

这应该有效:)

sSQL = "SELECT [fullname] FROM [listname] WHERE [Holiday Date] >="&"1/1/"& Year(Now);