您可以在 VBA 中创建动态幂查询公式吗？

Question

我使用 Excel 中的宏记录器将 table 从 PDF 导入到 Power Query 编辑器，然后将转换后的 table 导出到 excel .

我想将此代码重新用于结构相同的其他类似 PDF table。

问题是“价值余额”列在每个 PDF 中的日期不同 table。我想使用动态变量来处理更新日期。我在下面的代码中与变量“RefDate”一起使用的连接不起作用：

子宏 1()

RefDate = "05-05-22"

ActiveWorkbook.Queries.Add Name:="Table001 (Page 1)", Formula:= _
    "let" & Chr(13) & "" & Chr(10) & "    Source = Pdf.Tables(File.Contents(""C:\Users\MyPDF.pdf""), [Implementation=""1.3""])," & Chr(13) & "" & Chr(10) & "    Table001 = Source{[Id=""Table001""]}[Data]," & Chr(13) & "" & Chr(10) & "    #""Promoted Headers"" = Table.PromoteHeaders(Table001, [PromoteAllScalars=true])," & Chr(13) & "" & Chr(10) & "    #""Changed Type"" = Table.TransformColumnTypes(#""Promoted Headers"",{{""Ac" & _
    "count Code"", type text}, {""Ccy"", type text}, {""Book Balance"", type number}, {""Value Balance#(lf)"" & RefDate, type number}})" & Chr(13) & "" & Chr(10) & "in" & Chr(13) & "" & Chr(10) & "    #""Changed Type"""

结束子

如何在这种嵌套代码中创建动态字符串？

谢谢！

Answer 1

你可以在你的post中看到变量名是如何变绿的。这是它在字符串内部的视觉指示器。您必须断开字符串并连接变量。比较以下示例：

MyString = "The value is MyVar."

MyString = "The value is " & MyVar & "."

您可以在 VBA 中创建动态幂查询公式吗？

Can you create dynamic power query formulas in VBA?

string

excel

vba

double-quotes

powerquery