我需要有关VBA宏代码的帮助以进行空间移位和显示

Question

Sheets("summary").Range("A3:T1048576").Select

Selection.ClearContents

Sheets("summary").Range("a2").Select

For Each ws enter code hereIn ActiveWorkbook.Worksheets

If ws.Name <> "summary" Then

cont1 = Application.WorksheetFunction.CountA(ws.Range("A2:B1048576")) + 2

For a = 2 To cont1

If UCase(ws.Cells(a, 20)) = "N" Then

b = Application.WorksheetFunction.CountA(Sheets("summary").Range("A2:b1048576")) + 3

我很困惑-当我更改（“ A2：B1048576”））+ 2和（“ A2：b1048576”））+ 3时，该列之间有时会留一个空格。我想将显示答案移至第5行，但数据搜索从A2开始或可能是B2。谁能指导我并解释？