prova a mettere questa routine sull'evento form load
se ti da errore nell'apertura del recordset devi aggiungere nei riferimenti del codice "microsoft dao 3.6"codice:Dim rc As Recordset Set rc = CurrentDb.OpenRecordset("Select campo1 from tabella GROUP BY campo1;") Do While Not rc.EOF caselladitesto = caselladitesto & rc(0) rc.MoveNext Loop rc.Close
ovviamente lo devi adattare al tuo caso, nome del campo, della tabella della casella di testo ecc
![]()