VBA高级应用30例应用3ListObject对象:将表格转换回正常范围

B站影视 2025-01-09 18:43 3

摘要:《VBA高级应用30例》(版权10178985),是我推出的第十套教程,教程是专门针对高级学员在学习VBA过程中提高路途上的案例展开,这套教程案例与理论结合,紧贴“实战”,并做“战术总结”,以便大家能很好的应用。教程的目的是要求大家

《VBA高级应用30例》(版权10178985),是我推出的第十套教程,教程是专门针对高级学员在学习VBA过程中提高路途上的案例展开,这套教程案例与理论结合,紧贴“实战”,并做“战术总结”,以便大家能很好的应用。教程的目的是要求大家在实际工作中分发VBA程序,写好的程序可以升级。本套教程共三册三十个专题,本讲的内容是:VBA高级应用30例应用3在Excel中的ListObject对象:将表格转换回正常范围

【分享成果,随喜正能量】 做任何事情需要耐心、多观察自己的发心,不要凑合的心态做事,比如做一顿饭,如果你发心做最好吃的饭就会很用心去做,味道一定很棒,如果你发心做一顿凑合能吃的,那饭菜味道也可想而知;还有的人总爱把事情往坏处想,明明不存在的事在那不停地想象,那结果只会烦恼,要知道心的力量很大,应积极向上。。

在VBA中,表(Tables)的应用还是较普遍的,它们被称为ListObjects,这是Excel 2003引入的一个集合。但是对象模型的这一部分有很大的变化,我在这个专题简单给大家讲解一下应用,包括创建及一些格式操作。

6 将表格转换回正常范围

为了将列表表格转换回正常范围,我们可以用ListObject.Unlist 方法,这个方法从ListObject 对象删除列表功能。 使用此方法后,组成列表的单元格区域将是一个常规数据区域。

语法:expression.Unlist

其中expression代表 ListObject 对象的 变量。

运行此方法会保留工作表上的单元格数据、格式和公式。“汇总行”也保留不变。

代码示例:

Sub mynzRemoveTable

Dim oSh As Worksheet

Set oSh = ActiveSheet

'删除表格或列表样式

oSh.ListObjects("myTable1").Unlist

End Sub

代码截图:

代码运行后:

这时我们命名的myTable1就转换为普通的表格了。

我20多年的VBA实践经验,全部浓缩在下面的各个教程中:

来源:VBA语言专业教育

相关推荐