数据结构
网络
关系数据库管理系统 (RDBMS)
操作系统
Java
MS Excel
iOS
HTML
CSS
Android
Python
C语言编程
C++
C#
MongoDB
MySQL
Javascript
PHP
物理学
化学
生物学
数学
英语
经济学
心理学
社会学
服装设计
法学如何在Excel中始终搜索整个工作簿？
您可能多次使用过Excel中的“搜索”或“查找和替换”功能。它只会搜索当前活动的工作表，但您是否尝试过将搜索应用于整个工作簿？此功能在Excel中默认情况下不可用，但我们可以通过使用Excel中的VBA代码来实现。当您同时处理多个工作表时，此过程可以帮助您节省大量时间。本教程将帮助您了解如何始终搜索整个工作簿。
始终搜索整个工作簿
在这里，我们将插入一个VBA模块，然后运行代码来完成任务。让我们来看一个简单的例子，看看如何使用VBA代码始终搜索整个工作簿。
步骤1
假设我们有一个Excel工作簿，其中包含多个类似于下面图像所示的工作表。
现在，要在整个工作簿中搜索，右键单击任何工作表名称，然后选择“查看代码”以打开vba代码，然后单击“插入”，然后单击“模块”，并将程序键入文本框中，然后保存文件，如下面的图像所示。
程序
Sub FindReplace_WB()
'Updateby nirmal
Dim ws As Worksheet
Dim xFind As String
Dim xRep As String
Application.ScreenUpdating = False
On Error Resume Next
xFind = Application.InputBox("Find what", "Find", "", , , , , 2)
xRep = Application.InputBox("Replace with", "find", "", , , , , 2)
If xFind = "" Then
MsgBox "wrong...", vbInformation, "find"
Exit Sub
End If
For Each ws In ThisWorkbook.Worksheets
ws.UsedRange.Replace What:=xFind, Replacement:=xRep, LookAt:=xlWhole
Next ws
On Error GoTo 0
Application.ScreenUpdating = True
End Sub
步骤2
现在使用功能键F5打开一个弹出窗口，如下图所示。
我们可以使用此弹出窗口查找和替换整个工作簿，在文本框中输入单词，然后单击“确定”。
结论
在本教程中，我们使用一个简单的示例演示了如何在Excel中搜索整个工作簿以突出显示特定数据集。
更新于：2023年1月9日
609 次浏览
广告