BI神器Power Query（24）-- PowerQuery动态加载M公式

taller_2000

已于 2023-09-13 06:25:34 修改

阅读量586

点赞数

分类专栏：数据清洗 VBA Power Query 文章标签：动态加载 PQ公式加载M公式加载PQ公式动态公式

于 2023-09-02 06:51:52 首次发布

本文链接：https://blog.csdn.net/taller_2000/article/details/132633955

版权

VBA 同时被 3 个专栏收录

311 篇文章

订阅专栏

数据清洗

86 篇文章

订阅专栏

Power Query

29 篇文章

订阅专栏

本文介绍如何在ExcelPowerQuery中利用内置功能动态加载M公式，避免复杂的VBA编程，同时提醒读者注意安全问题。通过实例展示了如何从文件中读取并执行PowerQuery脚本以实现动态统计销售额。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Power Query 是Excel中的强大数据处理与转换工具，如果需要“动态”处理数据，大家第一时间想到的是可以使用VBA，利用代码创建M公式，进而创建PQ查询，但是复杂的M公式可能有很多行，使用VBA处理起来并不是很方便，并且用户打开工作簿文件时必须启用宏功能，代码才能发挥作用。

其实无需借助VBA，PQ内置功能就可以实现动态加载M公式，接下来使用一个简单的PQ示例进行演示。这个技巧通常用于动态执行Power Query脚本或表达式，允许在运行时构建和执行Power Query代码，以满足特定的需求。

基础原始数据保存在A列和B列中，使用PQ按照第一列统计汇总销售额，结果保存在E1开始的单元格区域，效果如下图所示。
在这里插入图片描述

PQ公式如下。

let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    更改的类型 = Table.TransformColumnTypes(源,{{"Date", type date}, {"Sales", Currency.Type}}),
    分组的行 = Table.Group(更改的类型, {"Date"}, {{"TotalSales", each List.Sum([Sales]), type nullable number}})
in
    分组的行

新建一个文本文件，将PQ公式保存为文本文件，此处文件名称为TotalSales.m，保存在D:\Temp目录中，如下所示。
在这里插入图片描述
新建一个PQ查询，在【高级编辑器】中替换为如下公式。

let
    Source = Text.FromBinary(File.Contents("d:\temp\TotalSales.m")),
    EvaluatedFormula = Expression.Evaluate(Source, #shared)    
in
    EvaluatedFormula

如下图所示。

在这里插入图片描述

保存查询，关闭PQ编辑器并上载至H1单元格开始的区域，如下图所示。

在这里插入图片描述

【代码解析】
使用 File.Contents 函数从文件 d:\temp\TotalSales.m 中读取文本内容，然后将这个文本内容作为表达式传递给 Expression.Evaluate 函数。同时，#shared 作为第二个参数传递给 Expression.Evaluate，以便表达式能够访问Power Query中共享的函数和变量。

注意：使用 Expression.Evaluate 时要小心，确保表达式的来源可信，以避免潜在的安全问题。