Πώς να διαγράψετε γρήγορα όλα τα περιεχόμενα των ξεκλειδωμένων / μη προστατευμένων κελιών στο Excel;
Εάν έχετε ένα φύλλο εργασίας που περιέχει ένα μέρος των ξεκλειδωμένων κελιών και τώρα, θα θέλατε να διαγράψετε όλα τα περιεχόμενα του ξεκλειδωμένου κελιού ταυτόχρονα. Έχετε λύσεις για να αντιμετωπίσετε αυτήν την εργασία;
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με τη λειτουργία Εύρεση και αντικατάστασης
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με τον κώδικα VBA
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με το Kutools για Excel
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με τη λειτουργία Εύρεση και αντικατάστασης
Για να διαγράψετε όλες τις τιμές των μη προστατευμένων κελιών, μπορείτε να χρησιμοποιήσετε τη δυνατότητα Εύρεση και αντικατάστασης για να επιλέξετε πρώτα τα ξεκλειδωμένα κελιά και στη συνέχεια να τα διαγράψετε αμέσως.
1. Ανοίξτε το φύλλο εργασίας που θέλετε να διαγράψετε τα ξεκλείδωτα κελιά και κάντε κλικ στο Αρχική > Εύρεση & Επιλογή > Εύρεση ή πατήστε συντομεύσεις - Ctrl + F για να ανοίξετε το Εύρεση και αντικατάσταση διάλογος, δείτε το στιγμιότυπο οθόνης:
2. Στην Εύρεση και αντικατάσταση , κάντε κλικ στην επιλογή Επιλογές κουμπί για επέκταση του διαλόγου, δείτε το στιγμιότυπο οθόνης:
3. Στη συνέχεια κάντε κλικ στο κουμπί Μορφή και, α Εύρεση μορφής θα εμφανιστεί το παράθυρο διαλόγου και μετά κάτω Απάτη καρτέλα, καταργήστε την επιλογή Κλειδωμένο και κρυμμένο κουτιά, δείτε το στιγμιότυπο οθόνης:
4. Κλίκ OK για να επιστρέψετε στο Εύρεση και αντικατάσταση πλαίσιο διαλόγου και, στη συνέχεια, κάντε κλικ Βρείτε όλα κουμπί, όλα τα μη προστατευμένα κελιά εμφανίζονται στο παρακάτω πλαίσιο λίστας και, στη συνέχεια, πατήστε Ctrl + A για να επιλέξετε όλα αυτά, δείτε το στιγμιότυπο οθόνης:
5. Και μετά κλείστε αυτό Εύρεση και αντικατάσταση διάλογο, όλα τα ξεκλείδωτα κελιά έχουν επιλεγεί στο τρέχον φύλλο εργασίας, δείτε το στιγμιότυπο οθόνης:
6. Τότε πρέπει απλώς να πατήσετε Διαγραφή κλειδί στο πληκτρολόγιο και τα επιλεγμένα ξεκλειδωμένα περιεχόμενα κελιού θα αφαιρεθούν ταυτόχρονα.
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με τον κώδικα VBA
Ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να διαγράψετε τα περιεχόμενα των ξεκλειδωμένων κελιών, κάντε το ως εξής:
1. Κρατήστε πατημένο το ALT + F11 για να ανοίξετε το Παράθυρο Microsoft Visual Basic for Applications.
2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.
Κωδικός VBA: Διαγραφή όλων των περιεχομένων των ξεκλειδωμένων κελιών
Sub ClearUnlockedCells()
'Updateby20140724
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub
3. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κώδικα και καθορίστε ένα εύρος που θέλετε να καταργήσετε το περιεχόμενο των ξεκλειδωμένων κελιών στο αναδυόμενο πλαίσιο, δείτε το στιγμιότυπο οθόνης:
4. Κλίκ OK, και τα περιεχόμενα σε ξεκλείδωτα κελιά εύρους έχουν διαγραφεί.
Διαγράψτε όλα τα περιεχόμενα των ξεκλειδωμένων κελιών με το Kutools για Excel
Εάν έχετε εγκαταστήσει Kutools για Excel, της Επιλέξτε Ξεκλείδωτα κελιά Η δυνατότητα μπορεί να σας βοηθήσει να επιλέξετε πρώτα τα μη προστατευμένα κελιά και στη συνέχεια να τα διαγράψετε ταυτόχρονα.
Kutools για Excel περιλαμβάνει περισσότερα από 300 εύχρηστα εργαλεία Excel. Δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Αποκτήστε το τώρα
Μετά την εγκατάσταση του Kutools για Excel, κάντε τα εξής βήματα:
1. Επιλέξτε το εύρος δεδομένων που θέλετε να διαγράψετε τα ξεκλείδωτα περιεχόμενα κελιού.
2. Κλίκ Kutools > Επιλέξτε Εργαλεία > Επιλέξτε Ξεκλείδωτα κελιά, δείτε το στιγμιότυπο οθόνης:
3. Και όλα τα ξεκλειδωμένα κελιά έχουν επιλεγεί στην επιλογή σας.
4. Τύπος Διαγραφή πληκτρολογήστε το πληκτρολόγιο για να διαγράψετε αμέσως τα επιλεγμένα περιεχόμενα κελιού.
Εάν θέλετε να μάθετε περισσότερα σχετικά με αυτήν τη λειτουργία, κάντε κλικ Επιλέξτε Ξεκλείδωτα κελιά.
Σχετικό άρθρο:
Πώς να επιλέξετε όλα τα ξεκλείδωτα κελιά στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!