excel - 创建在单元格中隐藏具有特定单词的行的宏

Question

我目前正在尝试创建一个宏，当单元格包含单词“apple”或“orange”时隐藏行。我似乎无法解决的问题是“苹果”和“橙色”可能出现的单元格周围还有其他词，如“香蕉”、“草莓”、“菠萝”等。虽然我的宏在只有“apple”或“orange”出现在单元格中，当其中一个词与其他词组合时，它不起作用。有人能帮助我吗？我目前正在使用 Office 365 for Mac/Excel 版本 16.16.2 请参见下面我正在使用的宏:

`BeginRow = 4
EndRow = 2844
ChkCol = 5

For RowCnt = BeginRow To EndRow
If Cells(RowCnt, ChkCol).Value = "Apple" Or Cells(RowCnt, ChkCol).Value = "Orange" 
     Then Cells(RowCnt, ChkCol).EntireRow.Hidden = True
Else 
     Cells(RowCnt, ChkCol).EntireRow.Hidden = False
End If 
Next RowCnt`

Answer 1

而不是 =，您应该使用 Like:

BeginRow = 4 EndRow = 2844 ChkCol = 5

For RowCnt = BeginRow To EndRow 
   If UCase(Cells(RowCnt, ChkCol).Value) Like "*APPLE*" Or UCase(Cells(RowCnt, ChkCol).Value) Like "*ORANGE*" Then  
      Cells(RowCnt, ChkCol).EntireRow.Hidden = True 
   Else Cells(RowCnt, ChkCol).EntireRow.Hidden = False 
   End If 
Next RowCnt

这将隐藏包含“apple”和/或“orange”(不区分大小写)的行。