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

Πώς να αποκρύψετε όλα τα φύλλα εργασίας εκτός από το καθορισμένο ή ενεργό στο Excel;

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

Απόκρυψη όλων των φύλλων εργασίας εκτός από το καθορισμένο στο Excel με κωδικό VBA
Απόκρυψη όλων των φύλλων εργασίας εκτός από το ενεργό με το Kutools για Excel (μόνο μερικά κλικ)


Απόκρυψη όλων των φύλλων εργασίας εκτός από το καθορισμένο στο Excel με κωδικό VBA


Μπορείτε να αποκρύψετε όλα τα φύλλα εργασίας εκτός από το καθορισμένο με τον κώδικα VBA στο Excel. Κάντε τα εξής:

1. Στο τρέχον ανοιχτό βιβλίο εργασίας, μεταβείτε στο φύλλο εργασίας που θέλετε να εμφανίζεται μόνο και, στη συνέχεια, πατήστε άλλος + F11 ταυτόχρονα για να ανοίξετε το Εφαρμογή Microsoft Visual Basic παράθυρο.

2. Στο Εφαρμογή Microsoft Visual Basic παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Δείτε το στιγμιότυπο οθόνης:

3. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στον επεξεργαστή κώδικα.

Κωδικός VBA: απόκρυψη όλων των φύλλων εκτός από ένα καθορισμένο

Sub SheetHidden()
	Dim xWs As Worksheet
	Dim xName As String
	xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> xName Then
			xWs.Visible = xlSheetHidden
		End If
	Next
End Sub

4. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα.

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

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

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

Κωδικός VBA: εμφάνιση κρυφών φύλλων εργασίας

Sub SheetUnHidden()
	Dim xWs As Worksheet
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Visible = True
	Next
End Sub

Απόκρυψη όλων των φύλλων εργασίας εκτός από το ενεργό με το Kutools για Excel (μόνο ένα κλικ)

Μπορείτε να αποκρύψετε όλα τα φύλλα εκτός από το καθορισμένο ή ενεργό με ένα μόνο κλικ στο Excel.

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. Μπείτε στο καθορισμένο φύλλο που θέλετε να εμφανίζεται μόνο στο τρέχον βιβλίο εργασίας.

2. Στη συνέχεια κάντε κλικ στο κουμπί Kutools > Εμφάνιση απόκρυψη > Απόκρυψη μη επιλεγμένων φύλλων.

Στη συνέχεια, όλα τα φύλλα στο τρέχον βιβλίο εργασίας είναι κρυμμένα εκτός από το ενεργό.

Note: Εάν θέλετε να εμφανίσετε όλα τα κρυμμένα φύλλα εργασίας, κάντε κλικ Kutools > Εμφάνιση / Απόκρυψη > Αποκρύψτε όλα τα φύλλα. Δείτε το στιγμιότυπο οθόνης:

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημέρα) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


Τα καλύτερα εργαλεία παραγωγικότητας του 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% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (0)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

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

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