Sub 替换()
For i = 1 To 10000
Cells(i, 1).Replace "美国人", "American"
Cells(i, 1).Replace "日本人", "Japanese"
Cells(i, 1).Replace "中国人", "Chinese"
'还有什么国家按上面的写
Next
End Sub
写VBA宏程序吧，装进数组，用取出左一的姓氏进行select-case判断 处理后装回表格。
按ctrl+h查找内容“张”替换内容“李”,点选项，选工作簿，替换全部即可，其它类推
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024