假设A栏有50行，都是数字，但不是有规律排列，相同数字相距可能很远。求设一个按钮将A栏中凡是“3”的数字，以及它们
各自同行的B,C,D等多栏的内容全部消除掉，请求帮助设计代码，谢谢！
------解决方案--------------------------------------------------------
- VB code
Sub DeleteRows() Dim lRow As Long For lRow = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1 If Cells(lRow, 1).Value = 3 Then Cells(lRow, 1).EntireRow.Delete Next lRowEnd Sub