Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 22-07-19, 00:45
Dimitriss Ο χρήστης Dimitriss δεν είναι συνδεδεμένος
Όνομα: Δημητρης
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 29-07-2015
Μηνύματα: 32
Προεπιλογή Επιλογή συγκεκριμένων εγγραφών και ενημέρωση αυτών

Καλησπέρα στην κοινότητα! θα ήθελα την πολύτιμη βοήθεία σας. Έχω φτιάξει μια φόρμα η οποία έχει ένα combobox , μια υποφόρμα και ένα κουμπί. Η υποφόρμα φέρνει εγγραφές από στοιχειά προϊοντων τα οποία τα χρεώνω σε υπαλλήλους.
Το combobox φέρνει τα στοιχεία των υπαλληλων. Θα ήθελα όταν επιλέγω πχ πέντε έγγραφες από την υποφόρμα και βάζω στο combobox βάζω έναν υπάλληλο πατώντας το κουμπί να ενημερώνονται οι επιλεγμένες εγγραφές της υποφόρμας.
Ο κώδικας που προσπάθησα να χρησιμοποιήσω είναι αυτός παρακάτω αλλά δεν δουλεύει. Πώς μπορώ να πάρω με κώδικα τις επιλεγμένες εγγραφές της υποφόρμας;
Κώδικας:
If Not IsNull(Me.staffcbo) Then
     Set F = Forms!Me![mysubfrom]
     Set rs = F.RecordsetClone
     rs.MoveFirst
     rs.Move F.SelTop - 1
     For i = 1 To F.SelHeight
       rs![staffname] = Me.staffcbo
       rs.MoveNext
     Next i

Else
    MsgBox "Δεν επιλέξατε υπάλληλο.", vbInformation
    Exit Sub
End If
ευχαριστώ!
Απάντηση με παράθεση