[Tasos]

Καλησπέρα Γιώργο!
Ο κώδικας που σου πρότεινα όπως και ο κώδικας του Γιώργου (kapetang) να δοκιμάσεις
βασίζεται στον κώδικα του συνημμένου σου και κάνει ακριβώς αυτό που ζητάς δηλαδή επιλέγει την εγγραφή που μόλις αντιγράφηκε.

Δεν είναι σαφές το που αλλού αντιμετωπίζεις πρόβλημα.

Αν θέλεις,σαν εναλλακτική λύση (και πιο απλή) δοκίμασε το παρακάτω:

Private Sub cmdTest()
        Dim Field1, Field2, Field3, Field4, Field5, Field6,  _
        Field7, Field8, Field9, Field10, Field11

        Field1 = Me!ΟΝΟΜΑΤΕΠΩΝΥΜΟ
        Field2 = Me!ΧΡΗΣΗ
        Field3 = Me!ΜΑΡΚΑ
        Field4 = Me!ΕΔΡΑ
        Field5 = Me!ΤΗΛΕΦΩΝΟ
        Field6 = Me!ΚΙΝΗΤΟ
        Field7 = Me!ΔΙΑΡΚΕΙΑ
        Field8 = Me!ΕΤΑΙΡΙΑ
        Field9 = Me!ΙΠΠΟΙ
        Field10 = Me!ΕΤΟΣΚΑΤΑΣΚΕΥΗΣ
        Field11 = Me!ΚΥΒΙΚΑ
        
        DoCmd.GoToRecord , , acNewRec
        
        Me!ΟΝΟΜΑΤΕΠΩΝΥΜΟ = Field1
        Me!ΧΡΗΣΗ = Field2
        Me!ΜΑΡΚΑ = Field3
        Me!ΕΔΡΑ = Field4
        Me!ΤΗΛΕΦΩΝΟ = Field5
        Me!ΚΙΝΗΤΟ = Field6
        Me!ΔΙΑΡΚΕΙΑ = Field7
        Me!ΕΤΑΙΡΙΑ = Field8
        Me!ΙΠΠΟΙ = Field9
        Me!ΕΤΟΣΚΑΤΑΣΚΕΥΗΣ = Field10
        Me!ΚΥΒΙΚΑ = Field11
End Sub

Φιλικά

Τάσος