Lang L: none (table-of-contents)
See õpetus näitab, kuidas VBA abil Exceli töölehe kõik read ja / või veerud peita.
Kuva kõik read
Kõigi Exceli lehe ridade peitmiseks määrame Varjatud vara kõikidest ridadest väärtusele FALSE.
Kõigile ridadele pääseme juurde, kasutades Kogu rea vara selle Lahtrite objekt:
1 | Lahtrid.EntireRow.Hidden = Vale |
või kasutades Kogu rea vara selle Ridade objekt:
1 | Rows.EntireRow.Hidden = Vale |
Kuva kõik veerud
Samamoodi saame Exceli lehe kõik veerud peidetud, muutes Varjatud vara kõigist veergudest.
Kõigile veergudele pääsete juurde, kasutades Kogu veeru atribuut selle Lahtrite objekt:
1 | Lahtrid.EntireColumn.Hidden = Vale |
või kasutades Kogu veeru atribuut selle Veerud Objekt:
1 | Veerud.EntireColumn.Hidden = Vale |
Peida kõik read või veerud
Muidugi, kõigi ridade või veergude peitmiseks määrake lihtsalt Varjatud vara tõele:
1 | Veerud.EntireColumn.Hidden = Tõsi |
Makro kõigi ridade ja veergude peitmiseks
Selle makro abil saate töölehe kõik read ja veerud peita:
1234 | Sub Unhide_All_Rows_Columns ()Veerud.EntireColumn.Hidden = ValeRows.EntireRow.Hidden = ValeEnd Sub |
Makro, et kuvada kõikidel lehtedel kõik read ja veerud
See makro kuvab Exceli töövihiku kõikide lehtede read ja veerud:
12345678 | Sub Unhide_All_Rows_Columns_in_Workbook ()Dim ws töölehenaIga ws töölehtedelVeerud.EntireColumn.Hidden = ValeRows.EntireRow.Hidden = ValeJärgmine wsEnd Sub |