下面是我的代码: Sub delete() Dim i As Long art = 2
x = "programing"DoWhile art < Application.WorksheetFunction.CountA(Workbooks("11.xlsm").Worksheets("sheet1").Range("
我正在尝试编写一个VBA代码,循环遍历活动工作簿中的每个工作表,并删除所有空白列和行,直到第一个带有数据的单元格。till A is populatedFor Each ws In ActiveWorkbook.Worksheets DoWhile ColCounter = 0End If Exit Do Loop
<