
22-07-19, 00:45
|
| Όνομα: Δημητρης Έκδοση λογισμικού 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
ευχαριστώ! |