[Tasos]

Γιώργο καλημέρα!
Στο σύνθετο πλαίσιο της φόρμας σου τροποποιείς την προέλευση γραμμής ως εξής:

SELECT test1.Αναγνωριστικό, test1.matia FROM test1 ORDER BY test1.matia;

Κατόπιν στην καρτέλα "Μορφή" άλλαξε το Πλήθος στηλών σε 2 και τα πλάτη στηλών σε:
0εκ.;3εκ.

Στην καρτέλα Συμβάντα, και στο συμβάν "Μετά την ενημέρωση" επίλεξε "[Διαδικασία συμβάντος]" από την πτυσσόμενη λίστα, και πάτησε το κουμπί που βρίσκεται δίπλα της.
Στο παράθυρο VBA που θα εμφανιστεί, θα δεις το εξής:

Private Sub matia_AfterUpdate()

End Sub

Άλλαξε το με το παρακάτω και δοκίμασε:

Private Sub matia_AfterUpdate()
    If Not IsNull(Me.matia) Then Me.xroma = DLookup("xroma", "test1", "Αναγνωριστικό  = " & Me.matia)
End Sub

Καλή συνέχεια!

Τάσος