在Excel中自动调整行高

时间:2009-11-24 20:56:17

标签: excel vba

在excel(2003)中,我在一个页面上有一个项目列表,我的估算师可以从中选择,然后在发票上打印所选项目....但我不想要项目的空白行未选中的。如何将空行高度设置为0,或者使行没有数据崩溃。这可能。

1 个答案:

答案 0 :(得分:1)

您可以在Excel中以编程方式设置RowHeight属性。

例如,您可以遍历一系列行并更改RowHeight:

Dim row As Range
For Each row In ActiveWorkbook.Worksheets("Sheet1").Range("10:20").Rows
    row.RowHeight = 0
Next

或执行一些条件评估:

Dim row As Range
For Each row In ActiveWorkbook.Worksheets("Sheet1").Range("10:20").Rows
    If row.Cells(1, 2).Value = 10 Then row.RowHeight = 0
Next

或删除行:

row.Delete