ListObject对象 vba编程技巧Excel vba编程应用
NO.1
Excel应用中，很多自定义的功能十分有用，可是基于初级用户来说，绝大多数是没有学到其真实技巧的。
通常在会做表格的情况下，就基本告别了继续学习高级应用的热情。
认为做了表格不过如此，似乎也没什么需要去认真学的必要。
但是，在一些特殊场景应用情况下，Excel预置的功能，给我们做出了大部分解决方法。
那么，在一些了解之后，对于解决这些问题就显得得心应手了。
NO.2
下面介绍一个有用的对象，ListObject
观其名就明白，这是一个列表对象。
可以理解为一个以列表形式的Range对象。
其中有若干方法和属性，如下表。
NO.3
下面以一个例子来解释，如何运用ListObject对象对表格进行操作。
下表是一个学生成绩管理相关表格，其功能只有一个，计算成绩总分，无论是横向总分，还是纵向学科总分计算，都以ListObject对象方式来进行。
首先要将所有学科作为ListObject标题，新建ListObject对象，代码如下：
Set wListObject = ws.ListObjects.Add(SourceType:=xlSrcRange, _
xllistobjecthasheaders:=xlYes, _
Destination:=Range("A1"))
这里用到ListObjects.Add 方法，ListObjects是ListObject对象集合，其方法只有一个Add，新建ListObject对象。
NO.4
本例中的求和计算函数
Sub AddListObject(ListCitem As Object)
    Dim ix As Integer, R As Range
        Set newlist = ListCitem.ListRows.Add
        Set R = newlist.Range
    ix = ListCitem.ListColumns.Count
    For i = 1 To ix
        R.Item(i).Value = Application.WorksheetFunction.Sum(newlist.ListColumns(i).Range)
    Next i
End Sub
ListObject其功能是将一个单元格区域作为一个列表来进行整体操作，其属性功能很多，可以实现y许多操作，如计算，排序，添加，删除等等。
其应用十分广泛，基本涵盖了Range所有方法。
所以，对于此类对象，有必要掌握并运用，可以提高对表格应用的操作熟练程度。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。