Πώς να κλειδώσετε συγκεκριμένα κελιά χωρίς να προστατεύσετε ολόκληρο το φύλλο εργασίας στο Excel;
Κανονικά, πρέπει να προστατεύσετε ολόκληρο το φύλλο εργασίας για να κλειδώσετε κελιά από την επεξεργασία. Υπάρχει κάποια μέθοδος κλειδώματος κελιών χωρίς προστασία ολόκληρου του φύλλου εργασίας; Αυτό το άρθρο προτείνει μια μέθοδο VBA για εσάς.
Κλείδωμα καθορισμένων κελιών χωρίς προστασία ολόκληρου του φύλλου εργασίας με VBA
Κλείδωμα καθορισμένων κελιών χωρίς προστασία ολόκληρου του φύλλου εργασίας με VBA
Ας υποθέσουμε ότι πρέπει να κλειδώσετε τα κελιά A3 και A5 στο τρέχον φύλλο εργασίας, ο ακόλουθος κώδικας VBA θα σας βοηθήσει να το επιτύχετε χωρίς να προστατεύσετε ολόκληρο το φύλλο εργασίας.
1. Κάντε δεξί κλικ στην καρτέλα φύλλων και επιλέξτε Προβολή κωδικού από το μενού με δεξί κλικ.
2. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Code. Δείτε το στιγμιότυπο οθόνης:
Κωδικός VBA: Κλείδωμα καθορισμένων κελιών χωρίς προστασία ολόκληρου του φύλλου εργασίας
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub
Note: Στον κώδικα, Στήλη 1, Σειρά = 3 και Σειρά = 5 υποδείξτε ότι τα κελιά A3 και A5 στο τρέχον φύλλο εργασίας θα κλειδωθούν μετά την εκτέλεση του κώδικα. Μπορείτε να τα αλλάξετε όπως χρειάζεστε.
3. Πάτα το άλλος + Q ταυτόχρονα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
Τώρα τα κελιά A3 και A5 είναι κλειδωμένα στο τρέχον φύλλο εργασίας. Εάν προσπαθήσετε να επιλέξετε το κελί A3 ή A5 στο τρέχον φύλλο εργασίας, ο δρομέας θα μετακινηθεί αυτόματα στο δεξί γειτονικό κελί.
Σχετικά Άρθρα:
- Πώς να κλειδώσετε όλες τις αναφορές κυττάρων σε τύπους ταυτόχρονα στο Excel;
- Πώς να κλειδώσετε ή να προστατεύσετε κελιά μετά την εισαγωγή δεδομένων ή την εισαγωγή στο Excel;
- Πώς να κλειδώσετε ή να ξεκλειδώσετε κελιά με βάση τιμές σε άλλο κελί στο Excel;
- Πώς να κλειδώσετε την εικόνα / εικόνα στο κελί ή στο εσωτερικό του Excel;
- Πώς να κλειδώσετε το πλάτος και το ύψος του κελιού από την αλλαγή μεγέθους στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!