用于在工作表列中的不同Excel工作表中搜索字符串的VBA包含句子并显示工作表包含该字符串

Question

例如：我想在所有工作表中搜索“返回订单”字符串，但工作表中的列包含ex中的句子（未达到退货订单）。任何工作表包含必填字符串，然后应显示该工作表。

Answer 1

Sub ertdfgcvb()
Dim ws As Worksheet, rng As Range, str1 As String
str1 = " return order"
On Error Resume Next
For Each ws In ActiveWorkbook.Worksheets
    If ws.Index > ActiveSheet.Index Then 'after the currently open worksheet
        Set rng = ws.Cells.Find(What:=str1, LookAt:=xlPart) 'tries to find your string
        ws.Select 'if it manages then selects the worksheet
        rng.Select 'and the cell in which it found the string
        Exit Sub
    End If
Next
End Sub

您的规格并不十分清楚，这是您可以开始使用的脚本。
不，后续行动是不可能的，我们不是随叫随到的节目服务。