举例:
图示,如何将张三全部替换成李四
在开始菜单中,选择查找和选择,点击替换功能;使用快捷键ctrl+F键,也可以打开替换页面
输入需要替换的内容
点击全部替换按钮
数据会进行自动替换
你把要放入B5单元格的数据 放在A列,B列放入对应的文件名 使用以下代码 Sub B5()i = 1Do Until ThisWorkbook.ActiveSheet.Cells(i, 2) = ""
Set dx_workbook = Workbooks.Open(ThisWorkbook.ActiveSheet.Cells(i, 2))
dx_workbook.Sheets("sheet1").Range("B5") = ThisWorkbook.ActiveSheet.Cells(i, 1)
i = i + 1
dx_workbook.Close
Set dx_workbook = Nothing
Loop
End Sub
你所说的所有表格是不是在同一工作簿中,这样的话直接用查找/替换就行了注意:选项中的范围一定选中工作簿
可以实现,将恶意用VBA处理,可以的话可以看看你的演示数据