
08-04-13, 17:19
|
| Όνομα: Δημήτρης Έκδοση λογισμικού Office: Ms-Office 2003 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 21-07-2010
Μηνύματα: 98
| |
Καλησπέρα
Γιώργο για δοκίμασε σε κάθε πεδίο που θέλεις να αντιγράφεται στη subfom πχ mytxt_1,mytxt_2...
Private Sub mytxt_1_AfterUpdate()
Me![mytxt_1].Tag = Me![mytxt_1]
End Sub
Private Sub mytxt_2_AfterUpdate()
Me![mytxt_2].Tag = Me![mytxt_2]
End Sub
ή και
Private Sub mytxt_1_Click()
Me![mytxt_1].Tag = Me![mytxt_1]
End Sub
Private Sub mytxt_2_Click()
Me![mytxt_2].Tag = Me![mytxt_2]
End Sub
ή σε κάποιο άλλο συμβαν δοκίμασε τι σε βολεύει
και στο συμβαν BeforeInsert της φόρμας
Private Sub Form_BeforeInsert(Cancel As Integer)
Me![mytxt_1] = Me![mytxt_1].Tag
Me![mytxt_2] = Me![mytxt_2].Tag
End Sub
αν ενημερώσεις πρώτα τη Ημέρα Δευτέρα όλα τα πεδία σου
και προχωρήσεις σε νέα εγγραφή Τρίτη τότε όλα τα πεδία θα γεμίσουν με τις εγγραφές της Δευτέρας
Ελπίζω να βοήθησα
Φιλικά
Δημήτρης
|