摘要: Sub setBlankRowColor() Dim lngLastRow As Long Dim i As Long '获取工作表中已使用区域最后一行的行号 lngLastRow = Cells(Rows.Count,1).End(xlUp).Row '遍历行 For i = 1 To lngLa 阅读全文
posted @ 2024-01-17 15:57 paoPaoLong_liu 阅读(168) 评论(0) 推荐(0) 编辑