见样表截图,把对照表放到D:E列
B2输入
=VLOOKUP(A2,D:E,2,)
公式下拉
然后选择B列>右键>复制>右键>选择性粘贴>数值
删除A列,OK.
用查找替换的方式替换早就完成了
公式暂时不能完成 可以用VBA批量替换
公式=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"河","A"),"阳","B"),"小","C"),"子","D"),"是","E"),"我","F")
下拉公式,将A1到......单元格中的"河"替换成"A";"阳"替换成"B";"小"替换成"C";"子"替换成"D";"是"替换成"E";"我"替换成"F"。还可往后继续写。