Αυτό το σεμινάριο θα δείξει πώς μπορείτε να αποκρύψετε όλες τις γραμμές ή / και τις στήλες σε ένα φύλλο εργασίας του Excel χρησιμοποιώντας VBA.
Αποκάλυψη όλων των γραμμών
Για να αποκρύψετε όλες τις γραμμές σε ένα φύλλο Excel, θα ορίσουμε το Κρυφή ιδιοκτησία όλων των σειρών στο FALSE.
Μπορούμε να έχουμε πρόσβαση σε όλες τις σειρές χρησιμοποιώντας το Ολόκληρη η ιδιότητα σειράς απο Αντικείμενο κελιών:
| 1 | Cells.EntireRow.Hidden = False |
ή χρησιμοποιώντας το Ολόκληρη η ιδιότητα σειράς απο Σειρές Αντικείμενο:
| 1 | Rows.EntireRow.Hidden = False |
Αποκάλυψη όλων των στηλών
Ομοίως, μπορούμε να αποκρύψουμε όλες τις στήλες σε ένα φύλλο Excel, προσαρμόζοντας το Κρυφή ιδιοκτησία όλων των στηλών.
Μπορείτε να έχετε πρόσβαση σε όλες τις στήλες χρησιμοποιώντας το Ολόκληρη ιδιότητα στήλης απο Αντικείμενο κελιών:
| 1 | Cells.EntireColumn.Hidden = False |
ή χρησιμοποιώντας το Ολόκληρη ιδιότητα στήλης απο Στήλες Αντικείμενο:
| 1 | Columns.EntireColumn.Hidden = False |
Απόκρυψη όλων των γραμμών ή στηλών
Φυσικά, για να αποκρύψετε όλες τις γραμμές ή τις στήλες, απλώς ρυθμίστε το Κρυφή ιδιοκτησία στην ΑΛΗΘΕΙΑ:
| 1 | Columns.EntireColumn.Hidden = True |
Μακροεντολή για αποκάλυψη όλων των γραμμών και στηλών
Χρησιμοποιήστε αυτήν τη μακροεντολή για να αποκρύψετε όλες τις γραμμές και τις στήλες σε ένα φύλλο εργασίας:
| 1234 | Sub Unhide_All_Rows_Columns ()Columns.EntireColumn.Hidden = FalseRows.EntireRow.Hidden = FalseΤέλος υπο |
Μακροεντολή για την εμφάνιση όλων των γραμμών και στηλών σε όλα τα φύλλα
Αυτή η μακροεντολή θα εμφανίσει όλες τις γραμμές και τις στήλες σε όλα τα φύλλα σε ένα βιβλίο εργασίας του Excel:
| 12345678 | Sub Unhide_All_Rows_Columns_in_Workbook ()Dim ws Ως φύλλο εργασίαςΓια κάθε ws σε φύλλα εργασίαςColumns.EntireColumn.Hidden = FalseRows.EntireRow.Hidden = FalseΕπόμενο wsΤέλος υπο |
