Excel VBA檢查單元格中的特定值

我現在遇到了一個很大的麻煩。我的問題是，有沒有什麼辦法可以刪除單元格內容，如果它的單元格值是字符串Total Attachment Size:？Excel VBA檢查單元格中的特定值

我有這部分，但不知道如何繼續。在網上搜索任何想法，但不幸的是這還不夠。

dim lastrow as integer 
dim ws as worksheet 

set ws = ThisWorkbook.sheets("Sheet1") 

lastrow = ws.cells(rows.count, 8).end(xlup).row 

if ws.range("H" & lastrow) contains `Total Attachment Size: ` then 
    ws.range("H" & lastrow).clearcontents 
    lastrow = ws.cells(rows.count, 8).end(xlup).row 

end if

任何幫助深表感謝。

來源

2016-11-23 ramj

所有小區'如果INSTR（ws.range （「H」＆lastrow），「總附件大小：」）> 0然後'（或者只是'如果ws.range（「H」＆lastrow）=「總附件大小：」那麼'如果你想它完全匹配）。 – YowE3K

這是按照您的代碼，如果你想檢查全部爲H列的值，然後讓我知道，我們可以運行一個循環，並清除包含值

Dim str As String 
On Error Resume Next 
str = Application.WorksheetFunction.Search("Total Attachment Size: ",Sheet1.Range("H" & Sheet1.Range("H500000").End(xlUp).Row).Value, 1) 

If Err.Number = 0 Then 

Sheet1.Range("H" & Sheet1.Range("H500000").End(xlUp).Row).ClearContents 

End If

來源

2016-11-23 10:46:35

Excel VBA檢查單元格中的特定值

回答

相關問題