起重钳厂家
免费服务热线

Free service

hotline

010-00000000
起重钳厂家
热门搜索:
技术资讯
当前位置:首页 > 技术资讯

多工作表查找替换有方

发布时间:2020-02-03 05:27:22 阅读: 来源:起重钳厂家

很多时候,我们需要对多个工作表进行查找或替换操作,但如果一个一个工作表进行操作,显然是相当的繁琐,完全编程实现又不太现实。其实,我们可以根据不同的情况采取不同的措施。

1. 同工作簿实现查找和替换

如果这些工作表是在同一个工作簿文档,那么我们只要更改选项设置即可解决这一问题:

按下“Ctrl+H”组合键,打开“查找和替换”对话框,单击右侧的“选项”按钮,切换到高级操作模式,仔细检查“范围”的设置选项,可以看到默认的范围为“工作表”,将其修改为“工作簿”,这样查找或替换的范围就是工作簿的所有工作表,效果如图1所示,效果显然提高不少。

如果只需要对部分工作表进行查找或替换,那么可以按住Ctrl键进行选择,然后打开“查找和替换”对话框,此时并不需要将范围修改为“工作簿”,直接点击“全部替换”或“查找全部”按钮就可以了。

2. 不同工作簿实现查找和替换

如果需要对不同工作簿的工作表进行查找和替换,那么可以考虑将这些工作表集中到一个工作簿文件,或者借助第三方软件或者编辑VBA代码实现,这里以插入VBA代码为例进行说明:

第1步:准备工作

创建一个名为“对照表.xls”的工作簿文件,仿照图2所示进行设置,同时创建一个名为“数据源”的文件夹,将需要批量替换的工作簿文件放在这个文件夹,注意上述文件必须放在同一路径下。

第2步:编辑VBA代码

按下“Alt+F11”组合键,打开Microsoft Visual Basic for Application窗口,依次选择“插入→模块”,在右侧窗格插入一个空白模块,手工输入或粘贴如下代码(代码文件下载地址:)

如图2所示,上述代码中的“MsgBox ("替换完成,请查看核对!")”中的内容可以自行设置,如果“\数据源”的路径或名称有所变化,请根据实际情况进行修改。代码检查无误之后,依次选择“文件→关闭并返回到Microsoft Word”,返回Word界面,按下“Alt+F8”组合键,点击右侧的“运行”按钮,很快就可以完成多工作簿的替换操作,替换完成之后会弹出图3所示的对话框。

以后,如果有类似的需求,我们只要对“对照表.xls”文档的内容进行修改就可以了。

熟女综合

佳妮

熟女王诱惑

美女图