Question

用vba在多个工作表查找某个字符，怎么写代码？循环跟查找怎么合在一起用啊？

用vba在多个工作表查找某个字符，怎么写代码？循环跟查找怎么合在一起用啊？比如说，在表1找不到我的字符，就到表2找，找不到再到表3找，求代码！！！

Answer 1

以下代码能满足你的要求，找到后激活此表并选中该单元格：

Sub 全工作簿查找字符串()
Dim Sh As Worksheet, Ra As Range
For Each Sh In Sheets
   Set Ra = Sh.Cells.Find("需查找的字符串", , , 1)
   If Not Ra Is Nothing Then
      Sh.Activate
      Ra.Select
      Exit Sub
   End If
Next
MsgBox "没有匹配的单元格！"
End Sub

Answer 2

使用VBA编的和序就可以了，等等我给你一段代码哈。

追问

好，劳烦

Answer 3

找到名字是需要返回对应值，还是只是看看名字存不存在？