顾乔芝士网

持续更新的前后端开发技术栈

# 在Excel的所有Sheet表中查找关键字内容的两种方法

# 在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运行代码,输入要查找的关键字,宏会遍历所有工作表,找到匹配内容时会弹出提示框显示所在工作表和单元格地址。

控制面板
您好,欢迎到访网站!
  查看权限
网站分类
最新留言