如何通过vba隐藏/显示列/行？

VBA隐藏属性

要使用 VBA 隐藏/显示 Excel 中的列或行，可以使用“隐藏”属性。要使用此属性，必须使用范围对象指定列或行，然后指定 TRUE/FALSE。

1. 使用范围对象指定列或行。
2. 之后，使用整个列/行属性来引用整个行或列。
3. 然后使用隐藏属性。
4. 最后，指定真/假。

这是要考虑的示例：

 Sub vba_hide_row_columns() 'hide the column A Range("A:A").EntireColumn.Hidden = True 'hide the row 1 Range("1:1").EntireRow.Hidden = True End Sub

在上面的代码中，我们使用隐藏属性来隐藏 A 列和 1 行。下面是显示它们的代码。

 Sub vba_hide_row_columns() 'unhide the column A Range("A:A").EntireColumn.Hidden = False 'unhide the row 1 Range("1:1").EntireRow.Hidden = False End Sub

隐藏/显示多行和多列VBA

 Sub vba_hide_row_columns() 'hide the column A to c Range("A:C").EntireColumn.Hidden = True 'hide the row 1 to 4 Range("1:4").EntireRow.Hidden = True End Sub

同样，如果你想显示多行和多列。

 Sub vba_hide_row_columns() 'hide the column A to c Range("A:C").EntireColumn.Hidden = False 'hide the row 1 to 4 Range("1:4").EntireRow.Hidden = False End Sub

隐藏所有列和行

 Sub vba_hide_row_columns() 'hide the column A Columns.EntireColumn.Hidden = True 'hide the row 1 Rows.EntireRow.Hidden = True End Sub

显示所有列和行

 Sub vba_hide_row_columns() 'unhide all the columns Columns.EntireColumn.Hidden = False 'unhide all the rows Rows.EntireRow.Hidden = False End Sub

隐藏/显示另一个工作表中的列和行

 Sub vba_hide_row_columns() 'hide all columns in the sheet 1 Worksheets("Sheet1").Columns.EntireColumn.Hidden = False 'hide all rows in the sheet 1 Worksheets("Sheet1").Rows.EntireRow.Hidden = False End Sub