VBA编辑,删除A列下面第一个空单元格之后的所有行,如何写代码?

如题所述

语句:

    Range(Range("a1").End(xlDown).Offset(1), Range("a65536")).EntireRow.Delete


完整测试验证无误的代码:

Sub xxx()
    Range(Range("a1").End(xlDown).Offset(1), Range("a65536")).EntireRow.Delete
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-11-27
sub aaa()

range(range("a1").end(xldown).offset(1,0),cells(rows.count,1)).entirerow.delete

end sub

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网