1、先确定记录中能判断唯一的数据
2、在刷新前,用变量保存当前选中的唯一的数据
3、刷新
4、通过以下代码定位到指定记录:
Me.Recordset.MoveFirst Me.Recordset.FindFirst "[唯一条件]=" & 变量