如何比较Excel VBA中的单元格位置?

好吧,所以基本上我想确定某个string的行位置是否低于另一个string。 如果是,我需要将该值设置为零。 我已经尝试了很多变化,但是这并不表示我可以用这种方式比较范围。 有没有另一种方法来获得细胞的位置,所以我可以做这个比较?

If i < 56 Then If Rng4(j) < Rng5(i + 1) Then Rng4(j).Activate X(i, j, 1) = ActiveCell.Offset(0, 1) X(i, j, 2) = ActiveCell.Offset(0, 2) Else X(i, j, 1) = 0 X(i, j, 2) = 0 End If End If 

您需要比较您的范围的行属性

 If i < 56 Then If Rng4(j).Row < Rng5(i + 1).Row Then Rng4(j).Activate X(i, j, 1) = ActiveCell.Offset(0, 1) X(i, j, 2) = ActiveCell.Offset(0, 2) Else X(i, j, 1) = 0 X(i, j, 2) = 0 End If End If