Question

我正在执行网络查询，并希望通过单元格引用来过滤列。

ThisWeek = ThisWorkbook.Sheets("Summary").Range("A1").Value

LastWeek = ThisWorkbook.Sheets("Summary").Range("M1").Value

ActiveWorkbook.Queries.Add Name:="1245", Formula:= _
    "let" & Chr(13) & "" & Chr(10) & "    Source = 
    Json.Document(Web.Contents(""" & finalstr & """))," & Chr(13) & "" & 
    Chr(10) & "     each ([Column1.report_begin_date] = " < " & ThisWeek & " > " 
    or [Column1.report_begin_date] = " < " & Last Week & " > ")"    
    #""Filtered Rows"""

ThisWeek和LastWeek都是每天更改的字符串，我希望查询按这些日期过滤掉。 VBA无法识别Im设置变量名的格式，也无法将其识别为可编辑变量。

Answer 1

基本上，您想要做的是为日期字符串变量添加引号，对吗？

您可以使用以下方法实现：“”“” （四引号）这将创建一个简单的 “

因此，如果将其添加到字符串变量的两侧，则将获得所需的内容，如下所示：

[...] " < " & """" & ThisWeek & """" & [...]

希望这会有所帮助

查询中的字符串变量使用什么格式

1 个答案: