如果是几万行的数据,这么查会不会很费时间。我的思路是从下往上查,从空行到非空行的位置。这思路如何!
Dim t As Table = Tables("表A")Dim pidx As Integer = 0For i As Integer = t.rows.count-1 To 0 Step -1 Dim r As Row = t.rows(i) If r.IsNull("第一列") = False Then pidx = r.Index End IfNext
t.Position = pidx