Excel如何一次性批量实现对多个内容的“查找并替换”？

2问题解答

解决这样的问题，还是用VBA代码快速的实现吧。

01.准备对应表

首先我们需要在G:H列准备好查找内容和替换为内容的对应表。如下图所示：

02.进入VBA代码编辑器

鼠标右击工作表名称标签，点击【查看代码】命令（或按快捷键Alt+F11键）进入VBA代码编辑器的窗口。

03.复制并粘贴代码

复制下面的那段VBA代码并粘贴至VBA代码编辑器窗口内。

04.运行代码

点击代码器窗口上方的【运行-运行子过程/用户窗体】命令。

代码如下：

Sub 公众号Excel情报局() Dim arr, brr, j&, i& arr = Range("G2:H4"): brr = Range("B2:B7") For j = 1 To UBound(brr) For i = 1 To UBound(arr) brr(j, 1) = Replace(brr(j, 1), arr(i, 1), arr(i, 2)) Next i Next j Range("B2:B7").Value = brr End Sub

转载：Excel如何一次性批量实现对多个内容的“查找并替换”？ - 知乎 (zhihu.com)