如果單元格為空,我正在嘗試通過洗掉另一張作業表上的一些單元格來清理我的作業簿(稍后我還需要洗掉另一張作業表上的列)不幸的是,這只會洗掉作業表上包含按鈕的單元格
我嘗試了以下方法:(已編輯)
Sub Delete_cells()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Sheets
If ws.Name = "Inlife" Or ws.Name Like "'Inlife (*)'" Then
If Range("C22") = "" Then
Range("B22:C22").Delete Shift:=xlUp
If Range("C23") = "" Then
Range("B23:C23").Delete Shift:=xlUp
End If
End If
End If
Next ws
End Sub
誰能幫我回到正軌?
uj5u.com熱心網友回復:
那這個呢:
...
For Each ws In ThisWorkbook.Sheets
If ws.Name = "Inlife" Or ws.Name Like "'Inlife (*)'" Then
If ws.Range("C22").Value = "" AND ws.Range("C23").Value = "" Then
ws.Range("B22:C23").Delete Shift:=xlUp
End If
End If
Next ws
End Sub
您不能一次檢查不同的單元格,您需要分別檢查所有單元格。
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/415389.html
標籤:
