Πώς να ομαδοποιήσετε και να καταργήσετε την ομαδοποίηση σειρών σε προστατευμένο φύλλο εργασίας;
Όπως όλοι γνωρίζουμε, σε ένα προστατευμένο φύλλο εργασίας, υπάρχουν πολλοί περιορισμοί για να εφαρμόσουμε ορισμένες λειτουργίες. Όπως, δεν είναι δυνατή η εναλλαγή μεταξύ ομαδοποιημένων και μη ομαδοποιημένων δεδομένων. Υπάρχει τρόπος ομαδοποίησης ή κατάργησης ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας;
Ομαδοποίηση και κατάργηση ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας με κώδικα VBA
Ομαδοποίηση και κατάργηση ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας με κώδικα VBA
Ίσως, δεν υπάρχει άλλος καλός τρόπος για να λύσετε αυτό το πρόβλημα, αλλά χρησιμοποιώντας έναν κωδικό VBA, κάντε τα εξής:
1. Ενεργοποιήστε το φύλλο εργασίας που θέλετε να χρησιμοποιήσετε, βεβαιωθείτε ότι το φύλλο εργασίας δεν προστατεύεται ακόμη.
2. Στη συνέχεια, κρατήστε πατημένο το ALT + F11 και ανοίγει το Παράθυρο Microsoft Visual Basic for Applications.
3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.
Κωδικός VBA: Ομαδοποίηση και κατάργηση ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας
Sub EnableOutlining()
'Update 20140603
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
Dim xPws As String
xPws = Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
End Sub
4. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό και θα εμφανιστεί ένα πλαίσιο προτροπής για να σας υπενθυμίσει ότι εισάγετε τον κωδικό πρόσβασης για την προστασία του τρέχοντος φύλλου εργασίας. Δείτε το στιγμιότυπο οθόνης:
5. Στη συνέχεια κάντε κλικ στο κουμπί OK, το φύλλο εργασίας σας έχει προστατευτεί, αλλά μπορείτε να επεκτείνετε και να συμβάλετε τα σύμβολα διάρθρωσης σε αυτό το προστατευμένο φύλλο εργασίας, δείτε το στιγμιότυπο οθόνης:
Note: Εάν το φύλλο εργασίας σας είναι ήδη προστατευμένο, αυτός ο κωδικός δεν θα λειτουργήσει.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
