| Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια! |
| | Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
|
#4
28-11-23, 13:01
| |||
| |||
 συνεχεια
σε περιπτωση που θελεις να καταχωρουνται στον κυριο σου πινακα προσθεσε ενα πεδιο ημνια και σε διαδικασια συμβαντος τον παρακατω κωδικα Private Sub εκτελεση2_Click() Dim rs As DAO.Recordset, i As Long Set rs = CurrentDb.OpenRecordset("Select * From [Πίνακας1]") For i = Me.ημνιαΑρχηΑδεια To Me.ημνιαΤελοςΑδεια rs.AddNew rs![ημνια] = CDbl(i) rs![ονομα] = Me.ονομα rs![ειδοςΑδειας] = Me.ειδοςΑδειας rs.Update Next End Sub καλη συνεχεια  |
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
Θεματικός Τρόπος
| |
| ||||
| Θέμα | Δημιουργός | Forum | Απαντήσεις | Τελευταίο Μήνυμα |
| [Συναρτήσεις] Τύπος Σχετικα με τα εσοδα συμφωνα με ενα σύνολο ημερωμηνιων | creativeadv | Excel - Ερωτήσεις / Απαντήσεις | 1 | 12-09-18 07:22 |
Η ώρα είναι 09:44.