Buscar valor de registro anterior

Boa tarde

Estou fazendo um formulário para fechamento de caixa. Tenho um campo chamado Saldo Anterior. Neste campo
tem que carregar o saldo do caixa do ultimo dia que foi fechado.

Tentei cfe abaixo, mas se se pular ID, ja nao funciona pq coloco -1. Existe uma maneiro simples de fazer isso e que funcione?


Texto20 = DLookup("[Saldo_Caixa]", "Fechamento", "[Código]=Forms![Fechamento]![Código]-1")
End Sub

Private Sub Comando0_Click()
Dim i As Integer
i = DLast("Código", "Fechamento") - 1
Me.Texto20 = DLookup("Saldo_Caixa", "Fechamento", "Código=" & i & "")
End Sub