Αυτό το σεμινάριο θα σας διδάξει πώς να αποκρύπτετε και να αποκρύπτετε φύλλα εργασίας με το VBA.
Απόκρυψη φύλλου στο VBA
Για να αποκρύψετε ένα φύλλο στο VBA, χρησιμοποιήστε το φύλλο εργασίας Ορατή ιδιότητα.
Ορίστε είτε την ιδιότητα Ορατό σε FALSE:
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = Λάθος |
ή ορίστε την ιδιότητα Ορατή σε xlSheetHidden:
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = xlSheetHidden |
Αυτό είναι το ίδιο με το εάν ο χρήστης έκανε δεξί κλικ στην καρτέλα φύλλου εργασίας και επιλέξει "απόκρυψη".
Αποκάλυψη φύλλου
Για να αποκρύψετε ένα φύλλο στο VBA, χρησιμοποιήστε το φύλλο εργασίας Ορατή ιδιότητα:
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = Αληθινό |
ή
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = xlSheetVisible |
Μπορείτε να δείτε τα κρυμμένα φύλλα κάνοντας δεξί κλικ στην περιοχή καρτέλας Φύλλο εργασίας:
Πολύ κρυμμένα φύλλα
Η ιδιότητα Sheet Visible έχει μια τρίτη επιλογή: xlSheetVeryHidden:
1 | Φύλλα εργασίας ("Sheet1"). Visible = xlSheetVeryHidden |
Τα πολύ κρυμμένα Φύλλα είναι κρυμμένα όταν κάνετε δεξί κλικ στην περιοχή καρτέλας Φύλλο εργασίας:
Αυτός ο κωδικός θα εμποδίσει τον χρήστη υπολογιστικού φύλλου να δει την καρτέλα Φύλλο εργασίας στο κάτω μέρος της οθόνης. Κρύβει επίσης το φύλλο εργασίας από τον χρήστη όταν κάνει δεξί κλικ στις καρτέλες στο κάτω μέρος. Ο μόνος τρόπος για να δείτε ότι υπάρχει το φύλλο εργασίας (ή να αποκρύψετε το φύλλο εργασίας) είναι ανοίγοντας το πρόγραμμα επεξεργασίας της Visual Basic.
Απόκρυψη πολύ κρυφών φύλλων
Τα πολύ κρυμμένα φύλλα εργασίας γίνονται ορατά ακριβώς όπως τα κανονικά κρυφά φύλλα εργασίας:
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = Αληθινό |
ή
1 | Φύλλα εργασίας ("Φύλλο1"). Ορατό = xlSheetVisible |
Απόκρυψη / απόκρυψη φύλλων στο πρόγραμμα επεξεργασίας VBA
Μπορείτε επίσης να αλλάξετε την ιδιότητα Ορατό φύλλο εργασίας εντός του VBA Editor:
Απόκρυψη όλων των καρτελών φύλλου εργασίας
Μπορεί επίσης να θέλετε να αποκρύψετε εντελώς την περιοχή καρτέλας φύλλου εργασίας για να αποτρέψετε την πλοήγηση του χρήστη σε διαφορετικά φύλλα εργασίας. Μάθετε περισσότερα σχετικά με την απόκρυψη καρτελών φύλλου εργασίας.
Απόκρυψη / απόκρυψη φύλλων στο προστατευμένο βιβλίο εργασίας
Το βιβλίο εργασίας σας πρέπει να είναι απροστάτευτο για να μπορέσετε να αποκρύψετε ή να αποκρύψετε φύλλα εργασίας. Για να προστατέψετε τη δομή του βιβλίου εργασίας σας χρησιμοποιήστε τον ακόλουθο κώδικα:
1 | ActiveWorkbook.Unprotect |
Εάν η δομή του βιβλίου εργασίας σας προστατεύεται με κωδικό πρόσβασης, πρέπει να το κάνετε αυτό:
1 | ThisWorkbook.Προστασία "κωδικού πρόσβασης" |
Απόκρυψη όλων των φύλλων
Αυτή η διαδικασία θα εμφανίσει όλα τα φύλλα εργασίας σε ένα βιβλίο εργασίας, χρησιμοποιώντας ένα Για κάθε βρόχο:
12345678 | Υπο Unhide_All_Sheets ()Dim ws Ως φύλλο εργασίαςActiveWorkbook.UnprotectΓια κάθε ws σε φύλλα εργασίαςws.Visible = xlSheetVisibleΕπόμενοΤέλος υπο |
Παρατηρήστε ότι καταργήσαμε πρώτα την προστασία του βιβλίου εργασίας, σε περίπτωση που προστατεύεται με κωδικό πρόσβασης.