[VBA] Πρόβλημα σε τύπο

[othonas]

Στο παρακάτω αρχείο έχουμε μια βάση δεδομένων με στοιχειά εργαζομένων και ένα φύλλο που περιέχει τον εργαζόμενο με τις απόδωσες που λαμβάνει κάθε μήνα . Έχω δημιουργήσει ένα κουμπί ( ΕΝΗΜΕΡΩΣΗ) το οποίο μου εμφανίζει τα στοιχειά του από την βάση δεδομένων. Αν όμως μεσα από την φορμα αλλάξω ΑΦΜ όνομα επώνυμο πατρώνυμο και πατώντας ‘’διόρθωση στοιχείων’’ εμφανίζει cant update. Μπορείτε να μου πείτε που έχω κάνει λάθος στους τύπους ? Ευχαριστώ

[Tasos]

Καλημέρα!

Όθωνα, επίτρεψε μου να σου δείξω την ιδέα μου που εν μέρει την υλοποίησα στο συνημμένο αρχείο.

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

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

Για να μεταφερθείς στην καρτέλα μιας εγγραφής αρκεί να κάνεις διπλό κλικ στη στήλη A του φύλλου "ΒΑΣΗ".

Αν η καρτέλα δεν υπάρχει, θα δημιουργηθεί αυτόματα.

Η κάθε νέα καρτέλα (φύλλο δεδομένων) που δημιουργείται στην ουσία είναι ένα αντίγραφο του κρυμμένου φύλλου "Template". Επομένως, τυχόν αλλαγές θα πρέπει να γίνουν στο φύλλο "Template" πριν προστεθούν νέες καρτέλες.

Ωστόσο μπορείς να χρησιμοποιήσεις την ενσωματωμένη φόρμα καταχώρησης / επεξεργασίας δεδομένων.
Έχω γράψει κώδικα για την εμφάνιση της φόρμας αυτής (μια γραμμή είναι) ο οποίος καλείται με το συνδυασμό πλήκτρων ALT+X από οποιοδήποτε φύλλο δεδομένων του βιβλίου.
Ένα κλασικό ελάττωμα της φόρμας αυτής είναι ότι δείχνει τις ημερομηνίες με αμερικάνικη μορφή.
Ωστόσο η ημερομηνίες που συμπληρώνονται από τον χρήστη αποθηκεύονται σωστά στο κελί.

Η περιήγηση από μια εγγραφή στην επόμενη γίνεται απλά με ENTER ή και με τα πλήκτρα Επάνω - Κάτω (Βελάκια).
Το αντίστροφο επιτυγχάνεται με το συνδυασμό πλήκτρων SHIFT+ENTER

Για τη χρήση της φόρμας μπορείς να ρίξεις μια ματιά εδώ: Add, edit, find, and delete rows by using a data form - Excel - Office.com

Καλή συνέχεια!

Τάσος

[othonas]

καλημέρα Tάσο και ευχαριστώ για την απάντηση . Tο πρόβλημα μου όμως είναι ότι στην συγκεκριμένη περίπτωση πολλές φορες τα στοιχεια που έχω είναι συνήθως το "oνοματεπωνυμο" και σταδιακά μου δίνουν τα υπόλοιπα στοιχεία . Για αυτό προσπαθω να βρω που έχει λάθος ο τύπος στην forma .

[othonas]

Τελικά δημιούργησα έναν πιο απλό τύπο . επισυνάπτω το αρχείο .