Καλησπέρα
Φίλε Χρήστο καλωσόρισες στην παρέα μας.
Για να είμαι ειλικρινής, δεν κατάλαβα το ζητούμενο με βάση αυτό που είδα στον κώδικα.
Η
φόρμα ανοίγει στο πρώτο φύλλο και το
πελατολόγιο είναι στο δεύτερο,
ενώ υπάρχει και ActiveCell ...
και ορίζεται η
περιοχή MyRange με Function ...
ενώ στα Textboxes
χρησιμοποιείς Find ...
Ακόμα δεν κατάλαβα, γιατί πρέπει να υπάρχουν δεξιά και αριστερά
ίδια Textboxes ...
Τώρα για να επαναπροσδιορίσουμε το ζητούμενο: Υποθέτω ότι έχεις σε κάποιο φύλλο ένα πελατολόγιο, με χ στήλες με στοιχεία πελατών.
Θέλεις να ανοίγεις μια φόρμα, όπου
αφ' ενός μεν με την επιλογή πελάτη να εμφανίζονται τα στοιχεία του,
αφ' ετέρου δε αν αλλάξεις κάποιο από αυτά, να ενημερώνονται οι εγγραφές
του πελατολογίου σου.
Το κατάλαβα σωστά;
Αλλά ας αρχίσουμε σωστά αφού θέλεις να χρησιμοποιείς κώδικα.
Πήγαινε πίσω στην
VBA και από τα εργαλεία > επιλογές επέλεξε και τίκαρε
στην πρώτη καρτέλα αυτό που φαίνεται στην συνημμένη εικόνα.
Αυτό εμφανίζει επάνω σε κάθε λειτουργική μονάδα την "έκφραση"
Option Explicit
που σε "αναγκάζει" να δηλώσεις τις μεταβλητές σου ώστε να ορίζεται
τι είναι τι και που είναι ποιο.
Αν κατάλαβα το ζητούμενο συνεχίζουμε.