主题：如何找到最后一条或上一条或下一条或第一条记录

通用的,表示当前表:

第一行：
With CurrentTable
    .Position = 0
End With

上一行：
With CurrentTable 
    .Position = .Position - 1
End With

下一行：
With CurrentTable 
    .Position = .Position + 1
End With

最末行：
With CurrentTable 
    .Position = .Rows.Count - 1
End With