Πρόβλημα μεταφοράς δεδομένων απο φόρμα σε φόρμα με μακροεντολή

[alex]

Καλησπέρα σέ όλους τους φίλους

Αντιμετωπίζω πρόβλημα με το πάτημα κουμπιού εντολής της φόρμας T_Booking θέλω να μεταφέρω με μακροεντολή <Ενημέρωση> τα δεδομένα απο το πεδίο GuestName της φόρμας T_Booking στο πεδίο GuestName της φόρμας F_DataEntrySub_A η οποία και είναι υποφόρμα της F_DataEntryMain
Στην μακροεντολή έχω βάλει άνοιγμα της φόρμας F_DataEntryMain και ορισμό τιμής:

Στοιχειο [Forms]![F_DataEntryMain]![F_DataEntrySub_A].[Form].[GuestName]
Εκφραση [Forms]![T_Bookings]![GuestName]
Γνωρίζει κάποιο μέλος τι πρέπει να κάνω ή την διόρθωση αν γίνεται.Ανεβάζω συνημμένο.

Φιλικά?Αλέξανδρος

[Meteora]

Καλησπέρα

1. Φτιάχνεις μια public μεταβλητή στη module M_01

Public varepiteto As String

2. Στο συμβάν "με το τρέχον" της φόρμας "Πελατολόγιο" γράψε

 Private Sub Form_Current()
    varepiteto = Me.GuestName
End Sub

3. Στο συμβάν "με την είσοδο" στο πεδίο της φόρμας που κάνεις καταχώρηση γράψε ( Η επιλογή του συμβάντος "με την είσοδο" είναι ενδεικτική και όχι η καλύτερη επιλογή...)

 Private Sub GuestName_GotFocus()
    Me.GuestName = varepiteto
End Sub

Με τον τρόπο αυτό διαβάζεται το περιεχόμενο του πεδίο μιας φόρμας και περνά σε άλλο πεδίο μιας άσχετης -με την προηγούμενη- φόρμας. Απο μακροεντολές δεν γνωρίζω παρά λίγα στοιχειώδη...

Με εκτίμηση

Νίκος Δ.

Υστερολόγιο: Διέγραψε τη μακροεντολή...

[alex]

Eυχαριστώ Νίκο

Δουλεύει έτσι
Εχω βάλει και την μακροεντολή με το άνοιγμα της φόρμας για να ανοίγει η μεταφερόμενη φόρμα αλλά πρέπει να κάνω κλικ πάνω στο πεδίο για να εμφανίσει το όνομα στο πεδίο της μεταφερόμενης φόρμας.

Με εκτίμηση
Αλέξανδρος