Tutto è possibile, ma in questo caso è SBAGLIATO tecnicamente, e per renderlo funzionale il rischio è rallentare moltissimo il processo.
Per questo ti suggerivo di farlo nella FORM e non nella query...
Se metti un Controllo non associato nella Form, e nella sua Origine Controllo inserisci:
=GetRecNum()
e poi vai a scrivere questa Funzione in un Modulo ottieni quello che hai chiesto:
Public Function GetRecNum() As Long
On Error GoTo erh
With CodeContextObject.RecordsetClone
If Not (.BOF And .EOF) Then
.Bookmark = CodeContextObject.Bookmark
GetRecNum = .AbsolutePosition + 1
End If
End With
ext:
Exit Function
erh:
GetRecNum = 0
End Function