如何将地址距离查询的HYPERLINK公式批量应用到Excel U列？

下面是几种替代下拉填充的批量操作方案，适合数千条数据的场景：

方法1：双击填充柄快速自动填充 #

• 在U2单元格输入公式 =HYPERLINK("https://www.google.com/search?q=" & J2 & " TO " & S2, T2)
• 将鼠标移到U2单元格右下角，当光标变成黑色十字（填充柄）时双击
• Excel会自动识别J/S列的最后一行数据，将公式批量填充到对应行的U列中（仅填充到有数据的行，避免空行填充）

方法2：快捷键批量填充 #

1. 选中U2单元格，输入目标公式
2. 按 Ctrl+Shift+↓ 快速选中U2到U列中最后一行有数据的单元格（匹配J/S列的数据行范围）
3. 按下 Ctrl+D，即可将U2的公式批量填充到选中的所有单元格

方法3：VBA宏批量插入公式（适合超大量数据或重复操作） #

如果需要频繁执行这个操作，或者数据量极大，可以用VBA一键完成：

1. 按 Alt+F11 打开VBA编辑器
2. 右键点击左侧的工作簿名称，选择「插入」→「模块」
3. 将以下代码粘贴到模块窗口：

Sub BatchFillHyperlink()
    Dim lastRow As Long
    ' 以J列最后一行有数据的行号为准，确保和地址数据行匹配
    lastRow = Cells(Rows.Count, "J").End(xlUp).Row
    ' 批量给U2到UlastRow设置公式
    Range("U2:U" & lastRow).Formula = "=HYPERLINK(""https://www.google.com/search?q="" & J2 & "" TO "" & S2, T2)"
End Sub

4. 按 F5 运行宏，公式会自动填充到U列对应行

方法4：Power Query 批量生成（适合需要数据同步的场景） #

如果你的数据是外部导入或需要定期更新，可以用Power Query：

1. 选中包含J、S、T列的数据区域，点击「数据」选项卡→「从表格/区域」
2. 在Power Query编辑器中，点击「添加列」→「自定义列」
3. 在自定义列公式框中输入（替换成实际的列标题）：

= Hyperlink("https://www.google.com/search?q=" & [J列标题] & " TO " & [S列标题], [T列标题])

4. 点击「确定」后，将数据加载回Excel，生成的超链接会自动批量应用到新列中

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