Šī apmācība parādīs, kā parādīt visas Excel darblapas rindas un / vai kolonnas, izmantojot VBA.
Rādīt visas rindas
Lai parādītu visas Excel lapas rindas, mēs iestatīsim Slēpts īpašums no visām rindām uz FALSE.
Mēs varam piekļūt visām rindām, izmantojot Visas rindas īpašums no Šūnu objekts:
| 1 | Cells.EntireRow.Hidden = False |
vai izmantojot Visas rindas īpašums no Rindas objekts:
| 1 | Rows.EntireRow.Hidden = False |
Rādīt visas slejas
Līdzīgi, mēs varam parādīt visas Excel lapas slejas, pielāgojot Slēpts īpašums no visām kolonnām.
Jūs varat piekļūt visām kolonnām, izmantojot Viss kolonnas īpašums no Šūnu objekts:
| 1 | Cells.EntireColumn.Hidden = False |
vai izmantojot Viss kolonnas īpašums no Kolonnas Objekts:
| 1 | Columns.EntireColumn.Hidden = False |
Slēpt visas rindas vai kolonnas
Protams, lai paslēptu visas rindas vai kolonnas, vienkārši iestatiet Slēpts īpašums uz TRUE:
| 1 | Columns.EntireColumn.Hidden = True |
Makro, lai parādītu visas rindas un kolonnas
Izmantojiet šo makro, lai parādītu visas darblapas rindas un kolonnas:
| 1234 | Sub Unhide_All_Rows_Columns ()Columns.EntireColumn.Hidden = FalseRows.EntireRow.Hidden = FalseBeigu apakš |
Makro, lai visās lapās parādītu visas rindas un kolonnas
Šis makro parādīs visas rindas un slejas visās Excel darbgrāmatas lapās:
| 12345678 | Apakšatslēpt_Visas_Rindas_Kolonnas_ darbagrāmatā ()Dim ws kā darblapaPar katru ws darblapāsColumns.EntireColumn.Hidden = FalseRows.EntireRow.Hidden = FalseNākamais wsBeigu apakš |
