答： 先看看实现所需效果的代码： Sub setBlankRowColor() Dim lngLastRow As Long Dim i As Long ‘获取工作表中已使用区域最后一行的行号 lngLastRow = Cel...
