Excel VBA：如何向Power Query的GET API请求传递动态参数

• 第一步：导入目标单元格区域到Power Query
  点击Excel顶部「数据」选项卡，选择「从表格/区域」，框选C2:C50单元格范围，若C1不是表头请取消勾选「我的表格有标题」，确认后进入Power Query编辑器，将该查询命名为加密货币符号列表，可以先执行一次筛选，删掉列内的空值，避免后续拼接参数出错。
• 第二步：生成逗号分隔的动态参数
  新建空白查询，或在现有查询中新增步骤，使用Text.Combine函数将所有符号拼接为逗号分隔的字符串，示例代码如下：

= Text.Combine(#"加密货币符号列表"[列1], ",")

注：如果你的符号列不是默认的「列1」，替换为实际的列名即可；如果符号包含特殊字符，可以先做URL转义再拼接，代码如下：

= Text.Combine(List.Transform(#"加密货币符号列表"[列1], each Uri.EscapeDataString(_)), ",")

将该步骤的查询命名为symbol参数值。

• 第三步：拼接完整动态API请求地址
  将你的API密钥和生成的symbol参数拼接为完整请求地址，示例代码：

= "https://pro-api.coinmarketcap.com/v1/cryptocurrency/quotes/latest?CMC_PRO_API_KEY=替换为你的实际APIKEY&symbol=" & #"symbol参数值"

• 第四步：发起API请求获取数据
  直接调用上述拼接好的地址拉取数据即可，示例代码：

= Json.Document(Web.Contents(你上一步生成的完整API地址变量))

如果请求时出现隐私权限报错，可进入「文件→选项和设置→查询选项→隐私」，选择「忽略隐私级别以提升性能」即可正常请求。

注意：不要把包含明文API密钥的Excel文件分享给他人，避免密钥被盗用产生损失。

内容的提问来源于stack exchange，提问作者Julien M