在Excel中使用VBA删除表上的总行数

时间:2014-11-20 14:06:04

标签: excel vba

我正在尝试使用VBA删除表上的总行,因为在加载数据时,它不允许在表中输入数据,使其低于总行数。

加载数据后,我希望Total Row再次处于活动状态,以便总计行数。

我有一个数据透视表的代码,但无法弄清楚如何使用标准表。

有人知道这是否可行?我在网上搜索得很高!

提前致谢

2 个答案:

答案 0 :(得分:5)

这假设您在Sheet1中有表,并且您只有一个表。根据需要更新。

Sheet1.ListObjects.Item(1).ShowTotals = False 

答案 1 :(得分:0)

这就是我想要实现的目标。

Sub RemoveTotalRow()
Dim tbl As ListObject

Set tbl = ActiveSheet.ListObjects("Processing")

tbl.TotalsRowRange.Delete

End Sub