如何在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 次浏览

启动您的职业生涯

通过完成课程获得认证

开始
广告