用VBA代码删除空行

用 VBA 代码删除空行 Sub deleteemptyrows()'删除所有空行 Dim lastrow As LongDim r As LongDim counter As L