Power Query加载CSV后Excel函数未计算，求Power Query内解决方法

方法一：优化VBA刷新（比原宏更高效） #

原宏逐个单元格循环效率较低，可直接针对目标列批量赋值，避免循环操作：

Sub RefreshFormulasEfficiently()
    Application.ScreenUpdating = False
    Dim targetTable As ListObject
    Dim targetColumn As ListColumn
    Dim dataRange As Range
    
    ' 指定目标表格和列
    Set targetTable = Worksheets("main").ListObjects("Table_adnovum_methodology_data")
    Set targetColumn = targetTable.ListColumns("包含HYPERLINK的列名") ' 替换为实际列名
    
    ' 仅当列有数据时执行
    If Not targetColumn.DataBodyRange Is Nothing Then
        Set dataRange = targetColumn.DataBodyRange
        dataRange.FormulaLocal = dataRange.Value
    End If
    
    Application.ScreenUpdating = True
End Sub

可将该宏绑定到Power Query刷新后的事件，实现自动触发。

方法二：在Power Query中直接解析生成超链接（无需公式） #

若无需保留原HYPERLINK公式文本，可在Power Query中解析出URL和显示文本，加载后自动生成超链接：

1. 打开Power Query编辑器，导入目标CSV文件
2. 选中包含HYPERLINK函数的列，点击「添加列」→「自定义列」
3. 输入以下Power Query公式（替换[你的列名]为实际列名）：

   let
       rawContent = [你的列名],
       ' 提取URL（第一个引号对之间的内容）
       url = Text.BetweenDelimiters(rawContent, """", """", 0, 1),
       ' 提取显示文本（分号后的引号对内容）
       displayText = Text.BetweenDelimiters(rawContent, """;""", """", 0, 1)
   in
       [URL=url, DisplayText=displayText]
   

4. 展开自定义列，得到URL和DisplayText两列
5. 加载数据到Excel表格后，添加计算列，输入公式：

   =HYPERLINK([@URL], [@DisplayText])
   

   该计算列会自动生成可点击的超链接，无需手动刷新。

方法三：修改Power Query加载方式，强制识别公式 #

若需保留原公式结构，可在Power Query中调整列的处理逻辑：

1. 在Power Query编辑器中选中目标列
2. 添加自定义列，输入[你的列名]（确保文本以=开头）
3. 将自定义列设置为文本类型后加载到Excel
4. 选中该列，按Ctrl+H打开替换对话框：
   • 查找内容：=
   • 替换为：=
   • 点击「全部替换」，Excel会自动识别并计算所有公式

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