[Resolvido]Referencia a dados localizado nas tabelas

Prezados,

Estou criando um sistema de locação de equipamentos, mas não posso ter o mesmo equipamento alugado no mesmo intervalo de data.

Quando uma tentativa deste tipo, ocorrer o sistema deve retornar uma mensagem, mas estou com dificuldade em criar a programação.
Comecei criando o código abaixo:

Dim Interval As Variant

Interval = DateDiff("d", DtInicio, DtFim)

If DtInicio < (DtInicio + Interval) And (DtInicio > Date) Then
Call MsgBox("O equipamento já está locado para o período conforme ACP" [b]& Forms!ACP!Codigo[/b], vbCritical, "Aviso")
DoCmd.CancelEvent
Me.DtInicio.SetFocus
Else

End If
End Sub

O que estou com dificuldade neste ponto é em fazer a referencia ao numero da ACP que deve ser localizado na tabela, ou seja,
ao verificar que o equipamento ja existe para a data especifica me diga qual o numero da ACP em que isso ocorre.

Existe alguma indicação na tabela que o
equipamento foi emprestado além da data?

O equipamento possui um identificador, que me permite comparar se o mesmo já aparece na tabela com outra data ou com datas coincidentes.

Então use o Dlookup para isso...

Resolvido