Όπως τα περισσότερα άλλα αναπτυσσόμενα μενού, αυτά στο Excel διαθέτουν βέλη με δυνατότητα κλικ. Ωστόσο, μπορεί να θέλετε να αποκρύψετε ή να αφαιρέσετε τα βέλη κατά την εξαγωγή ή την κοινή χρήση των αρχείων σας Excel.
Πώς λοιπόν αφαιρείτε τα ανεπιθύμητα βέλη; Υπάρχουν δύο μέθοδοι για να το κάνετε – η μία είναι αρκετά εύκολη και χρησιμοποιεί βασικά εργαλεία του Excel και η άλλη απαιτεί να εφαρμόσετε έναν συγκεκριμένο κώδικα στο αρχείο στο οποίο εργάζεστε. Σε κάθε περίπτωση, ο παρακάτω οδηγός θα σας βοηθήσει να το κάνετε χωρίς να ιδρώσετε.
Ρυθμίσεις συγκεντρωτικού πίνακα
Αυτή είναι η γρήγορη και εύκολη μέθοδος, αλλά πρέπει να γνωρίζετε ότι η ενέργεια κρύβει επίσης τα ονόματα των πεδίων. Εάν δεν σας πειράζει αυτό, μη διστάσετε να ελέγξετε τα παρακάτω βήματα. Διαφορετικά, μεταβείτε απευθείας στην πιο προηγμένη μέθοδο κωδικοποίησης/μακροεντολών.
Βήμα 1
Επιλέξτε το πρώτο κελί κάτω από το όνομα του πεδίου και κάντε δεξί κλικ πάνω του. Κάντε κλικ στις Επιλογές Συγκεντρωτικού Πίνακα στο αναδυόμενο μενού, θα πρέπει να το βρείτε στο κάτω μέρος της λίστας.
Βήμα 2
Μόλις εμφανιστεί το παράθυρο Επιλογές Συγκεντρωτικού Πίνακα, θα πρέπει να επιλέξετε την καρτέλα Εμφάνιση. Αναζητάτε "Εμφάνιση υπότιτλων πεδίων και αναπτυσσόμενων φίλτρων". Αυτή η δυνατότητα ελέγχεται από προεπιλογή και πρέπει να την αποεπιλέξετε για να εξαφανιστούν τα βέλη.
Όταν καταργήσετε την επιλογή της δυνατότητας, κάντε κλικ στο OK στο κάτω μέρος του παραθύρου για να τεθούν σε ισχύ οι αλλαγές. Κάντε προεπισκόπηση του πίνακα για να διαπιστώσετε εάν όλα φαίνονται εντάξει χωρίς τα ονόματα των πεδίων.
Μέθοδος Μακροεντολών
Τα οφέλη αυτής της μεθόδου είναι ότι τα ονόματα των πεδίων παραμένουν ανέπαφα και μπορείτε να επιλέξετε να αφαιρέσετε όλα τα αναπτυσσόμενα βέλη ή μόνο ένα από αυτά. Επιφανειακά, αυτή η μέθοδος μπορεί να φαίνεται δύσκολη, αλλά κυρίως καταλήγει σε προσεκτική αντιγραφή και επικόλληση.
Αφαίρεση όλων των βελών
Βήμα 1
Πρώτα, ελέγξτε το κομμάτι του κώδικα που πρέπει να εφαρμόσετε για να απαλλαγείτε από όλα τα βέλη στο αρχείο σας.
Sub DisableSelection ()
‘αφαιρέστε τον οδηγό αναπτυσσόμενου βέλους από το techjunkie.com
Dim pt Ως Συγκεντρωτικός Πίνακας
Dim pt As PivotField
Set pt = ActiveSheet.PivotTables (1)
Για κάθε pf Σε pt.PivotFields
pf.EnableItemSelection = False
Επόμενο πφ
End Sub
Αυτός ο κωδικός περνά από όλα τα πεδία και τα κελιά και απενεργοποιεί τη δυνατότητα επιλογής στοιχείων. Με άλλα λόγια, απενεργοποιεί όλα τα βέλη στον συγκεντρωτικό πίνακα.
Βήμα 2
Αντιγράψτε ολόκληρο τον κώδικα/μακροεντολή – χρησιμοποιήστε Cmd+C σε Mac ή Ctrl+C σε υπολογιστή με Windows. Λάβετε υπόψη σας, ο κώδικας πρέπει να αντιγραφεί ως έχει γιατί ακόμη και ένα μικρό τυπογραφικό λάθος μπορεί να επηρεάσει τη λειτουργικότητά του.
Τώρα, πρέπει να κάνετε κλικ στην καρτέλα Προγραμματιστής κάτω από τη γραμμή εργαλείων του Excel και να επιλέξετε το μενού της Visual Basic. Θα πρέπει να είναι η πρώτη επιλογή στο μενού Προγραμματιστής.
Σημείωση: Ορισμένες εκδόσεις του Excel ενδέχεται να μην διαθέτουν την καρτέλα Προγραμματιστής. Εάν αντιμετωπίσετε αυτό το πρόβλημα, χρησιμοποιήστε τη συντόμευση πληκτρολογίου Alt+F11 για να μεταβείτε απευθείας στο μενού της Visual Basic.
Βήμα 3
Επιλέξτε το βιβλίο εργασίας/έργο στο οποίο εργάζεστε από το μενού στην επάνω αριστερή γωνία του παραθύρου της Visual Basic. Κάντε κλικ στο Εισαγωγή στη γραμμή εργαλείων και επιλέξτε Μονάδα.
Η λειτουργική μονάδα θα πρέπει να εμφανίζεται σε ένα μεγάλο μενού στα δεξιά και ο κέρσορας πρέπει να βρίσκεται ακριβώς εκεί που πρέπει να επικολλήσετε τον κωδικό. Όταν επικολλάτε τον κώδικα, η γραμμή σχολίων (αυτή που ξεκινά με την απόστροφο) γίνεται πράσινη και οι άλλες γραμμές είναι μαύρες και μπλε.
Βήμα 4
Επιστρέψτε στο φύλλο Excel και επιλέξτε οποιοδήποτε κελί. Επιλέξτε την καρτέλα Προβολή, κάντε κλικ στο μενού Μακροεντολές στη δεξιά πλευρά και, στη συνέχεια, επιλέξτε τη μακροεντολή/κωδικό που μόλις επικολλήσατε.
Θα πρέπει να είναι το πρώτο στο μενού. Επιλέξτε το, κάντε κλικ στην επιλογή Εκτέλεση και όλα τα βέλη θα εξαφανιστούν από τον πίνακα.
Αφαίρεση ενός βέλους
Και πάλι, αυτός είναι ο κωδικός που μπορείτε να χρησιμοποιήσετε για να αφαιρέσετε μόνο ένα από τα αναπτυσσόμενα βέλη.
Sub DisableSelectionSelPF ()
‘αφαιρέστε τον οδηγό αναπτυσσόμενου βέλους από το techjunkie.com
Dim pt Ως Συγκεντρωτικός Πίνακας
Dim pf As PivotField
Σφάλμα Συνέχιση Επόμενο
Set pt = ActiveSheet.PivotTables (1)
Σετ pf = pt.PageFields (1)
pf.EnableItemSelection = False
End Sub
Από εδώ και πέρα, θα πρέπει να ακολουθήσετε τα βήματα 2 έως 4 από την προηγούμενη ενότητα.
Σημείωση: Για τους σκοπούς αυτού του άρθρου, η μακροεντολή έχει προγραμματιστεί να απαλλαγεί από το πρώτο βέλος που συναντά. Ο κωδικός μπορεί να είναι λίγο διαφορετικός εάν θέλετε να αφαιρέσετε ένα άλλο βέλος.
Πράγμα που πρέπει να ληφθεί υπόψη
Οι μέθοδοι έχουν δοκιμαστεί και δοκιμαστεί σε ένα μικρό φύλλο που περιέχει 14 σειρές και 5 στήλες. Ωστόσο, θα πρέπει να δουλέψουν και σε πολύ μεγαλύτερα φύλλα.
Αξίζει να σημειωθεί ότι τα βήματα ισχύουν για τις εκδόσεις του Excel από το 2013 έως το 2016. Οι μακροεντολές θα πρέπει να ισχύουν και για νεότερες επαναλήψεις λογισμικού, αλλά η διάταξη του εργαλείου μπορεί να είναι λίγο διαφορετική.
Όταν χρησιμοποιείτε μακροεντολές, μπορείτε να επαναφέρετε τις αλλαγές αλλάζοντας την τιμή από = Λάθος προς το = Αλήθεια. Βάλτε μερικές κενές γραμμές στη μονάδα, επικολλήστε ολόκληρο τον κώδικα και απλώς αλλάξτε τον pf.EnableItemSelection γραμμή.
Πυροβόλησε το αόρατο βέλος
Η χρήση μακροεντολών θεωρείται συχνά ενδιάμεση ή ακόμα και προηγμένη γνώση του Excel. Στην πραγματικότητα, οι μακροεντολές δεν είναι τόσο δύσκολο να κατακτηθούν και μπορούν να σας βοηθήσουν να απαλλαγείτε γρήγορα από τα βέλη και να κάνετε πολλά άλλα ωραία πράγματα.
Γιατί θέλετε να αφαιρέσετε τα βέλη από το φύλλο σας; Έχετε χρησιμοποιήσει μακροεντολές στο παρελθόν; Μοιραστείτε την εμπειρία σας με την υπόλοιπη κοινότητα του TechJunkie.