[pm4698]

Όσον αφορά τη λύση του Τάσου μου λειτουργεί πολύ καλά!
Απλά για να ξέρουν και οι αναγνώστες στη θέση του
If IsOpen(strForname) Then
χρησιμοποίησα το
If CurrentProject.AllForms(strForname).IsLoaded Then

Κατά τ'άλλα μια χαρά.
Για την προσθήκη ενός Επωνύμου σε λίστα χρησιμοποιώ το:
If TargetTextBoxName = "list1" Or TargetTextBoxName = "list2" Then
Forms(strForname).Controls(TargetTextBoxName).AddI tem Me.Επώνυμο
Else: Forms(strForname).Controls(TargetTextBoxName) = Me.Επώνυμο

Και το αντίστοιχο στο onLoad της φόρμας που ανοίγει.

Θα δοκιμάσω και τον κώδικα του nisgia και θα πω τις εντυπώσεις μου!

Σας ευχαριστώ για τον χρόνο σας!