Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
ciao Ivo53,
con una query con subQuery, supponendo che idimpiegato sia una pk :
SELECT Impiegati2.IDImpiegato,
Impiegati2.Cognome,
Impiegati2.Nome,
(select top 1
idimpiegato
from
impiegati2 as i
where i.idimpiegato<impiegati2.idimpiegato order by idimpiegato desc) AS prevValue
FROM Impiegati2;
con VBA su click di uno dei controlli ( stessa assunzione di cui sopra circa la PK) :
Private Sub Posizione_Click()
With Me.RecordsetClone
If Not IsNull(Me.IDImpiegato) Then
.Bookmark = Me.Bookmark
.MovePrevious
If Not .BOF Then
VBA.MsgBox .IDImpiegato
End If
End If
End With
End Sub
HTH, ciao, Sandro.