[VBA/ACCESS] Importare dati da una casella di riepilogo

[[_Kilckk_]]

Ciao a tutti io uso questo codice per richiamare dei dati:

Private Sub txtRicerca_Change()
Dim strR As String
Dim strSQL As String
strR = Me!txtricerca.Text
If Not IsNull(Me!txtricerca.Text) Then
    strSQL = "SELECT scheda " & _
    "FROM [Archivio nominativi] " & _
    "WHERE (Nominativi Like " & Chr$(34) & "*" & _
    strR & "*" & Chr$(34) & ");"
    Me!ElencoNominativi.RowSource = strSQL
    Me!ElencoNominativi.Requery
    Me!txtricerca = strR
    Me!txtricerca.SetFocus
    Me!txtricerca.SelStart = 255
End If
End Sub

Ora questi dati vanno a finire in una casella di riepilogo... volevo sapere se era possibile spostare questo dato in una casella di testo o direttamente in una tabella

Grazie per il vostro aiuto.