我试着做“下一个单元”,但没有骰子。我正在尝试从 G2 开始向下列,并将结果转储到不同的工作表中。
For Each cell In Range("G2").End(xlDown)
If cell.Value = "New York" Then
ActiveCell.Offset(0, -2).Select
ReDim partnerArray(0 To i)
partnerArray(i) = ActiveCell.Offset(0, -2).Value
Next
ActiveWorkbook.Worksheets ("By Resource Level")
Range("A1").Value = partnerArray