此代码非常适合我需要执行的操作,但它停在BC列。我需要它继续通过该行,但要排除该行中属于BD列的单元格。它正在搜索该行中的任何信息,但BD列始终具有通用信息,因此由于该列而总是得到误报。
我尝试了各种循环,并且尝试了if语句来排除BD列,但它总是让我失望。
For Each Cell In Range("E2:E" & Cells(Rows.Count, "A").End(xlUp).Row)
Dim rng4 As Range
Set rng4 = Range("E" & Cell.Row & ":" & "BC" & Cell.Row) 'AE
If Application.WorksheetFunction.CountA(rng4) = 0 Then
Range("D" & Cell.Row).Value = "IDINO"
Else
Range("D" & Cell.Row).Value = "IDI"
End If
Next Cell
我尝试过的所有操作都不会更改当前结果,也不会为我提供该列中的所有IDINO或该列中的所有IDI。如果有人能引导我朝正确的方向感到沮丧,我将不胜感激。