如何查找包含特定文本的單元格，然後隱藏整行

當按下按鈕時，我想遍歷表單中的所有單元格並查找包含.doc或.xls或.pdf的單元格，並隱藏整個行。我知道我不能使用Contains，但必須有類似的東西。如何查找包含特定文本的單元格，然後隱藏整行

細胞例如PM-TR Training.doc

這是我現在我可以代替包含？

Sub HideRows() 
    Dim cell As Range 
    Dim DataCount As Integer 
    'Change the sheet name as necessary in the following line 
    With Worksheets("Sheet1") 
     DataCount = Range("A" & Rows.Count).End(xlUp).Row 
     For Each cell In Range("A1:A" & DataCount) 
      If cell.Contains(".doc") Or cell.Contains(".xls") Or cell.Contains(".pdf") Then 
       'The following code assumes you want the row hidden. 
       Range(cell.Row).EntireRow.Hidden = True 
      End If 
     Next cell 
    End With 
End Sub

來源

2015-02-23 phil652

可能重複[檢查是否一個字符串包含另一個字符串（http://stackoverflow.com/questions/15585058/check-if-a-string-contains-another-string） – 2015-02-23 15:50:20

我看到了這個問題，發佈之前，但我真的不知道如何使它適用於我的情況。現在我非常感謝user3561813 – phil652 2015-02-23 16:06:58

你可以在你的問題中提到它，以便在實現中獲得更好的幫助，但重要的是你現在明白了 – 2015-02-23 16:09:32

函數InStr與IF語句應該有所訣竅。的

IF instr(cell.value, ".doc")> 0 then 
    'Code Here

來源

2015-02-23 15:53:02 user3561813

它的作品非常感謝你 – phil652 2015-02-23 16:03:18

如何查找包含特定文本的單元格，然後隱藏整行

回答

相關問題