Note: The other languages of the website are Google-translated. Back to English

Πώς να ομαδοποιήσετε και να καταργήσετε την ομαδοποίηση σειρών σε προστατευμένο φύλλο εργασίας;

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

Ομαδοποίηση και κατάργηση ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας με κώδικα VBA

Office Tab Ενεργοποιήστε την επεξεργασία με καρτέλες και την περιήγηση στο Office και κάντε την εργασία σας πολύ πιο εύκολη ...
Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%
  • Επαναχρησιμοποίηση οτιδήποτε: Προσθέστε τους πιο χρησιμοποιούμενους ή σύνθετους τύπους, γραφήματα και οτιδήποτε άλλο στα αγαπημένα σας και χρησιμοποιήστε τους γρήγορα στο μέλλον.
  • Περισσότερα από 20 χαρακτηριστικά κειμένου: Εξαγωγή αριθμού από συμβολοσειρά κειμένου. Εξαγωγή ή κατάργηση μέρους των κειμένων. Μετατροπή αριθμών και νομισμάτων σε αγγλικές λέξεις.
  • Συγχώνευση εργαλείων: Πολλαπλά βιβλία εργασίας και φύλλα σε ένα. Συγχώνευση πολλαπλών κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων. Συγχώνευση διπλών σειρών και αθροίσματος.
  • Διαχωριστικά εργαλεία: Διαχωρίστε δεδομένα σε πολλαπλά φύλλα με βάση την τιμή. Ένα βιβλίο εργασίας για πολλαπλά αρχεία Excel, PDF ή CSV. Μία στήλη σε πολλές στήλες.
  • Επικόλληση παράλειψης Κρυφές / φιλτραρισμένες σειρές; Καταμέτρηση και άθροισμα ανά χρώμα φόντου; Αποστολή εξατομικευμένων μηνυμάτων ηλεκτρονικού ταχυδρομείου σε πολλούς παραλήπτες μαζικά.
  • Σούπερ φίλτρο: Δημιουργήστε προηγμένα σχήματα φίλτρων και εφαρμόστε σε οποιοδήποτε φύλλο. Είδος ανά εβδομάδα, ημέρα, συχνότητα και άλλα. Φίλτρο με έντονη γραφή, φόρμουλες, σχόλια ...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Λειτουργεί με το Office 2007-2021 και το 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας.

βέλος μπλε δεξιά φούσκα Ομαδοποίηση και κατάργηση ομαδοποίησης σειρών σε ένα προστατευμένο φύλλο εργασίας με κώδικα 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 για να εκτελέσετε αυτόν τον κωδικό και θα εμφανιστεί ένα πλαίσιο προτροπής για να σας υπενθυμίσει ότι εισάγετε τον κωδικό πρόσβασης για την προστασία του τρέχοντος φύλλου εργασίας. Δείτε το στιγμιότυπο οθόνης:

doc-group-σε-προστατευμένο-φύλλο1

5. Στη συνέχεια κάντε κλικ στο κουμπί OK, το φύλλο εργασίας σας έχει προστατευτεί, αλλά μπορείτε να επεκτείνετε και να συμβάλετε τα σύμβολα διάρθρωσης σε αυτό το προστατευμένο φύλλο εργασίας, δείτε το στιγμιότυπο οθόνης:

doc-group-σε-προστατευμένο-φύλλο1

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


Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (32)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτό φαίνεται να λειτουργεί τέλεια, αλλά όταν κλείνω και ανοίγω ξανά το βιβλίο εργασίας, αντιμετωπίζω το ίδιο πρόβλημα - δεν μπορώ να επεκτείνω τις ομάδες που έχουν καταρρεύσει.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχω το ίδιο πρόβλημα, ξέρει κανείς πώς να το ξεπεράσω. Πολλά ευχαριστώ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Χρειάζεστε VBA για αυτό και ο τελικός χρήστης θα πρέπει να επιτρέψει τις μακροεντολές για να λειτουργήσουν.

Πατήστε Alt+F11 για να ενεργοποιήσετε το Visual Basic Editor.

Κάντε διπλό κλικ στο ThisWorkbook, κάτω από τα Αντικείμενα του Microsoft Excel στην εξερεύνηση έργου στην αριστερή πλευρά.

Αντιγράψτε τον ακόλουθο κώδικα στη μονάδα που εμφανίζεται:



Ιδιωτικό Sub Workbook_Open ()
Με φύλλα εργασίας ("Σύνοψη Emp")
.EnableOutlining = True
.Protect UserInterfaceOnly:=True
Τέλος με
Sub End



Αυτός ο κωδικός θα εκτελείται αυτόματα κάθε φορά που ανοίγει το βιβλίο εργασίας.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
[quote]Αυτό φαίνεται να λειτουργεί τέλεια, αλλά όταν κλείνω και ανοίγω ξανά το βιβλίο εργασίας, αντιμετωπίζω το ίδιο πρόβλημα - δεν μπορώ να επεκτείνω τις ομάδες που έχουν καταρρεύσει.Από τον Mayich[/quote]Αυτό το θέμα επιλύεται ως εξής Private Sub Workbook_Open() Dim wsh As Variant For Every wsh In Worksheets(Array("Sheet1", "Sheet2")) wsh.EnableOutlining = True wsh.Protect Password:="260615" , DrawingObjects:=False, _ contents:=True, _ Scenarios:=True, _ AllowFiltering:=True, _ AllowFormattingCells:=True, _ userinterfaceonly:=True Next wsh End Sub
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αντιμετώπισα το ίδιο πρόβλημα, μόλις κλείσω και εισαγάγω ξανά το φύλλο, δεν λειτουργεί... παρακαλώ δώστε βήμα προς βήμα πού και πώς να χρησιμοποιήσετε Αυτό το θέμα λύθηκε ως παρακάτω Private Sub Workbook_Open() Dim wsh As Παραλλαγή για κάθε wsh Σε φύλλα εργασίας(Arra y("Φύλλο1", "Φύλλο2")) wsh.EnableOutli ning = True wsh.Protect Password:="2606 15", DrawingObjects: =False, _ contents:=True, _ Σενάρια: =True, _ AllowFiltering:=True, _ AllowFormattingCells:=True, _ userinterfaceonly:=True Next wsh End Sub
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ευχαριστώ πολύ αδερφέ, αυτό λειτουργεί πολύ ωραία. Ευχαριστώ πολύ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Πώς το πετύχατε αυτό; Προσπάθησα να το προσθέσω στο VBA παραπάνω και να φτιάξω μια διαφορετική ενότητα, αλλά και πάλι δεν λειτουργεί. Χρειάζεται να αλλάξω κάποιον από τους κωδικούς; όπως ο κωδικός πρόσβασής μου που χρησιμοποιώ ή πρέπει να αλλάξω τα ονόματα των φύλλων;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχω το ίδιο πρόβλημα όταν κλείνω το βιβλίο εργασίας. Καμιά ιδέα για να το φτιάξω;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Private Sub Workbook_Open() Dim wsh As Variant For Every wsh In Worksheets(Array("TD_phase_3", "RS_Phase_2")) wsh.EnableOutlining = True wsh.Protect Password:="260615", DrawingObjects:=False, _ contents: =True, _ Scenarios:=True, _ AllowFiltering:=True, _ AllowFormattingCells:=True, _ userinterfaceonly:=True Next wsh End Sub
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ακόμα δεν είμαι σίγουρος πώς λειτουργεί αυτό. Να φτιάξω μια νέα ενότητα ή να συνδέσω την παραπάνω;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Μπορείτε να κάνετε ένα βήμα προς βήμα περπατώντας ως προς το πού να το τοποθετήσετε όπως έκαναν στις αρχικές οδηγίες. Σας ευχαριστώ.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γειά σου! Χρησιμοποίησα την πρώτη μακροεντολή με επιτυχία και μετά είχα το ίδιο πρόβλημα με το κλείσιμο του βιβλίου εργασίας και η μακροεντολή δεν λειτουργεί πλέον. Βλέπω τη λύση παραπάνω, αλλά δεν μπορώ να το πετύχω καθόλου. Θα σε πείραζε να με περάσεις; Συνδυάζω και τους δύο κωδικούς ή απλώς χρησιμοποιώ τους τελευταίους; Εάν ο κωδικός πρόσβασής μου είναι "dog" αντικαθιστώ μία από τις τιμές στον κωδικό; Εφαρμόζω μόνο ένα φύλλο εργασίας ("Φύλλο1"). το χρησιμοποιώ πουθενά; Ευχαριστώ πολύ εκ των προτέρων!!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Βοηθήστε με, θέλω να συμπτύξω και να επεκτείνω ορισμένα ρολά και στήλες σε ένα υπολογιστικό φύλλο excel που είναι προστατευμένο. Πώς μπορώ να χρησιμοποιήσω μακροεντολές για να το κάνω αυτό; Δοκίμασα αυτό που έδειξες, αλλά απλά δεν λειτουργούν στο υπολογιστικό φύλλο μου. Παρακαλώ βοηθήστε.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας, βοηθήστε με να επεκτείνω και να συμπτύξω ρολά και στήλες σε υπολογιστικό φύλλο excel που είναι προστατευμένο. Δοκίμασα να χρησιμοποιήσω αυτά που έδειξες παραπάνω αλλά δεν λειτουργούν.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχει ερωτηθεί / απαντηθεί; Πού στον κωδικό μπορείτε να καθορίσετε / να αλλάξετε έναν προσωπικό κωδικό πρόσβασης;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Πώς μπορώ να αλλάξω τον κωδικό πρόσβασης σε άλλη τιμή;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Όταν χρησιμοποιώ την εντολή, βλέπω ένα μήνυμα σφάλματος όπως φαίνεται παρακάτω:
Ιδιωτικό Sub Workbook_Open ()
Dim wsh As Variant
Για κάθε wsh σε φύλλα εργασίας (Πίνακας ("TD_phase_3", "RS_Phase_2"))
wsh.EnableOutlining = True
wsh.Protect Password:="260615", DrawingObjects:=False, _
περιεχόμενα:=Αλήθεια, _
Σενάρια:=Αλήθεια, _
AllowFiltering:=True, _
AllowFormattingCells:=True, _
userinterfaceonly:=True
Επόμενο wsh
Sub End
Σφάλμα χρόνου εκτέλεσης '9':
Δείκτης εκτός της περιοχής
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
αυτό λειτουργεί για λίγο, μόλις κλείσεις και ανοίξεις ξανά, σταματάει :(
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ακόμα και για μένα, υπάρχει κάποια άλλη λύση;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Subbook_Work_Open()
«Ενημέρωση 20140603
Dim xWs ως φύλλο εργασίας
Ορισμός xWs = Application.ActiveSheet
Dim xPws ως συμβολοσειρά
xPws = "rfc" ''Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
Sub End
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχω πάρει αυτόν τον κωδικό για να λειτουργήσει. Αλλά όταν κλείνω και ανοίγω ξανά, πρέπει να πάω στην καρτέλα προγραμματιστή, να επιλέξω το κουμπί μακροεντολών, να επιλέξω εκτέλεση και να εισάγω τον κωδικό πρόσβασης.

Υπάρχει τρόπος να αφαιρέσετε τον κωδικό πρόσβασης από τον κωδικό Ή ένας κωδικός αυτόματης εκτέλεσης που θα εκτελεί αυτόματα αυτό το marco και θα εισάγει τον κωδικό πρόσβασης;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Για να διορθώσετε το πρόβλημα ότι αυτό δεν λειτουργεί στο αρχείο σας αφού το κλείσετε και το ανοίξετε ξανά, πρέπει να επικολλήσετε τον κώδικα VBA στο "ThisWorkbook" κάτω από τα Αντικείμενα του Microsoft Excel αντί για μια νέα λειτουργική μονάδα. Αυτό θα εκτελεί αυτόματα τη μακροεντολή κάθε φορά που ανοίγει το αρχείο.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχετε γραφικά για τον Κώδικα VBA που συζητήθηκε πριν από 6 ημέρες για να κάνετε αναζήτηση για το ThisWorkbook στο Microsoft Objects αντί για μια νέα ενότητα. Η λειτουργικότητα χάνεται όταν επιστρέφω στο βιβλίο εργασίας μου
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Κάποιος μπορεί να χρειαστεί αυτό, νομίζω ότι κατάλαβα πώς να το κάνω αυτό να λειτουργήσει.

Πρώτα, ο κώδικάς σας πρέπει να γραφτεί στο "ThisWorkbook" κάτω από τα αντικείμενα του Microsoft Excel, όπως προτείνει το @peachyclean.
Δεύτερον, πάρτε τον κωδικό που έγραψε ο @Sravanthi και επικολλήστε στην παραπάνω τοποθεσία.

Subbook_Work_Open()
«Ενημέρωση 20140603
Dim xWs ως φύλλο εργασίας
Ορισμός xWs = Application.ActiveSheet
Dim xPws ως συμβολοσειρά
xPws = "rfc" ''Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
Sub End

Το θέμα είναι ότι πρέπει να βρίσκεστε στο φύλλο που θέλετε να προστατέψετε, αλλά να επιτρέπετε τη χρήση ομαδοποίησης, και να αποθηκεύσετε το βιβλίο εργασίας και να κλείσετε, χωρίς να προστατεύσετε. Τώρα αν το ανοίξετε, η μακροεντολή ξεκινά αυτόματα, θα κάνει το φύλλο προστατευμένο με κωδικό "rfc". Τώρα μπορείτε να χρησιμοποιήσετε την ομαδοποίηση, το φύλλο προστατεύεται.

Για τη λύση μου, έχω τροποποιήσει τον κωδικό πρόσβασης που εφαρμόστηκε, ώστε να μπορείτε να ξαναγράψετε οποιονδήποτε κωδικό πρόσβασης ΕΔΩ:
xPws = "WRITEANYPASSWORDHERE" ''Application.InputBox("Password:", xTitleId, "", Type:=2)

Επιπλέον, δεν ήθελα να είναι ενεργό το προς προστασία φύλλο κατά το άνοιγμα του αρχείου, επομένως έχω τροποποιήσει αυτό το τμήμα:
Ορίστε xWs = Application.ActiveSheet ->
Ορισμός xWs = Εφαρμογή. Φύλλα εργασίας ("WRITEANYSHEET'SNAMEHERE")

Τώρα λειτουργεί σαν γούρι, το φύλλο με το όνομα 'WRITEANYSHEET'SNAMEHERE' προστατεύεται αλλά ισχύει η ομαδοποίηση. Μακροπρόθεσμα, νομίζω ότι το πρόβλημα θα είναι ότι αν θέλω να τροποποιήσω αυτό το αρχείο και να διατηρήσω τη λύση, πρέπει να καταργήσω την προστασία αυτού του φύλλου για να λειτουργήσει στο επόμενο άνοιγμα. Υποθέτω ότι μπορείτε να γράψετε μια άλλη μακροεντολή για αυτόματη κατάργηση της προστασίας κατά το κλείσιμο :)


Ελπίζω να βοήθησε.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου.. αυτό έκανε θαύματα. το μόνο μέρος όπου έχω κολλήσει τώρα είναι ότι πρέπει να το κάνω για πολλά φύλλα στο βιβλίο εργασίας. μπορείτε να βοηθήσετε με αυτό.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτή η συμβολοσειρά φαινόταν να είναι ακριβώς αυτό που χρειαζόμουν, καθώς δεν ξέρω τίποτα για το VBA. Κατάφερα να το κάνω αυτό να λειτουργήσει αρχικά, αλλά όπως επισημάνθηκε, μόλις κλείσετε το υπολογιστικό φύλλο και το ανοίξετε ξανά, δεν λειτουργεί πλέον. Προσπάθησα να γράψω τον κώδικα στο "ThisWorkbook" όπως σημειώθηκε, αλλά δεν μπορώ να καταλάβω πώς να το κάνω. Μπορώ να δω το "ThisWorkbook" αλλά δεν ξέρω πώς να γράψω σε αυτό. Με κάθε τρόπο που βλέπω για τη δημιουργία μιας λειτουργικής μονάδας, δημιουργεί μια νέα λειτουργική μονάδα σε έναν ξεχωριστό φάκελο "Ενότητες", έξω από το φάκελο "Αντικείμενα Microsoft Excel". Έχετε προτάσεις για το πώς να τοποθετήσετε αυτόν τον κωδικό στο "ThisWorkbook";
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
θαυμάσιος
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Πώς να ομαδοποιήσετε και να καταργήσετε την ομαδοποίηση σειρών και στηλών σε προστατευμένο φύλλο εργασίας;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
f*ck, αυτό έκλεψε το excel μου αργότερα και άλλαξε τον κωδικό πρόσβασης ιδιωτικά
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Υπάρχει τρόπος να το κάνετε αυτό να λειτουργήσει σε ένα κοινόχρηστο βιβλίο εργασίας; - Χρειάζομαι αλλαγές στο κομμάτι, ευχαριστώ
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Τοποθετήστε Περισσότερα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL