如果在Sheet21的列U(实际命名为“ROG Registration”)中出现“Self Cancelled”或“Waitlisted”,我在VBA中编写了以下代码以删除完整行。当我在ROG注册选项卡上打开VBA窗口并运行它时,它可以正常工作。
我有一个带宏按钮的单独选项卡,我将此宏指定给表单控件按钮,但是当我单击按钮时没有任何反应。
知道为什么吗?可能是我需要在代码中使用“ROG注册”名称吗?“。首先选择”选项卡,因为它位于与按钮不同的选项卡上?
Sub ROG_DeleteRows()
Dim r As Integer
For r = Sheet21.UsedRange.Rows.Count To 1 Step -1
If Cells(r, "U") = "Self Cancelled" Then
Sheet21.Rows(r).EntireRow.Delete
ElseIf Cells(r, "U") = "Waitlisted" Then
Sheet21.Rows(r).EntireRow.Delete
End If
Next
End Sub
@ cybernetic.nomad它完美无缺。谢谢!!!我认为这可能是问题,但不确定在哪里编辑(我对VBA来说还不够新)。
—
Lenny
@Lenny,你应该写这个如果Sheet21.Cells(r,“U”)=“自我取消”然后而不是 If Cells(r,“U”)=“自我取消”然后。
—
Rajesh S
If Sheet21.Cells(r, "U") =...
否则默认使用活动工作表(即带有按钮的工作表)