Question

我想知道如何使用vba从表中删除空白行。任何帮助，将不胜感激！我目前拥有的代码将创建表格，它将选择我需要删除的范围。但我无法弄清楚如何实际删除我需要的行。我需要有两个不同的表格。

提前致谢！

Worksheets.Item("Report").Range("H1:L50").Select
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$H$1:$L$150"), ,xlYes).Name  = _
"Table1"

Range("Table1").Activate

Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete

Answer 1

在将范围转换为表格之前，我会删除空行。

Dim Target As Range
Set Target = Range("$H$1:$L$150")
Target.SpecialCells(xlCellTypeBlanks).Delete xlShiftUp

ActiveSheet.ListObjects.Add(xlSrcRange, Target, , xlYes).Name = "Table1"

如何在vba中删除空行表行

1 个答案:

在将范围转换为表格之前，我会删除空行。