# 在Excel的所有Sheet表中查找关键字内容的两种方法
## 一、方法一:使用查找功能:
### 1、按下Ctrl + F键,打开 “查找和替换” 对话框。
### 2、在 “查找内容” 框中输入要搜索的关键字,如:张三丰。
### 3、点击 “选项” 按钮,将 “范围” 从默认的 “Sheet表” 改为 “工作簿”。
### 4、还可根据需要设置 “区分大小写”“匹配整个单元格内容” 等高级选项,以精确查找。
### 5、点击 “查找全部” 按钮,会列出所有匹配项的位置,包括工作表名称、单元格地址等;点击 “查找下一个” 则会逐一定位到每一个匹配项。
## 二、方法二:使用 VBA 宏:
### 1、按下Alt + F11打开 VBA 编辑器,右键点击 “VBAProject”,选择 “插入” -> “模块”。
在模块中输入以下代码:
```vba
Sub SearchAllSheets()
Dim ws As Worksheet
Dim rng As Range
Dim searchStr As String
searchStr = InputBox("请输入搜索内容:")
For Each ws In ThisWorkbook.Worksheets
Set rng = ws.Cells.Find(What:=searchStr, LookIn:=xlValues, LookAt:=xlPart)
If Not rng Is Nothing Then
MsgBox "在" & ws.Name & "找到: " & rng.Address
End If
Next ws
End Sub
```
### 2、按下F5运行代码,输入要查找的关键字,宏会遍历所有工作表,找到匹配内容时会弹出提示框显示所在工作表和单元格地址。