excel-vba
Werken met Excel-tabellen in VBA
Zoeken…
Invoering
Dit onderwerp gaat over het werken met tabellen in VBA en gaat uit van kennis van Excel-tabellen. In VBA, of liever het Excel-objectmodel, staan tabellen bekend als ListObjects. De meest gebruikte eigenschappen van een ListObject zijn ListRow (s), ListColumn (s), DataBodyRange, Range en HeaderRowRange.
Een ListObject instantiëren
Dim lo as ListObject
Dim MyRange as Range
Set lo = Sheet1.ListObjects(1)
'or
Set lo = Sheet1.ListObjects("Table1")
'or
Set lo = MyRange.ListObject
Werken met ListRows / ListColumns
Dim lo as ListObject
Dim lr as ListRow
Dim lc as ListColumn
Set lr = lo.ListRows.Add
Set lr = lo.ListRows(5)
For Each lr in lo.ListRows
lr.Range.ClearContents
lr.Range(1, lo.ListColumns("Some Column").Index).Value = 8
Next
Set lc = lo.ListColumns.Add
Set lc = lo.ListColumns(4)
Set lc = lo.ListColumns("Header 3")
For Each lc in lo.ListColumns
lc.DataBodyRange.ClearContents 'DataBodyRange excludes the header row
lc.Range(1,1).Value = "New Header Name" 'Range includes the header row
Next
Een Excel-tabel converteren naar een normaal bereik
Dim lo as ListObject
Set lo = Sheet1.ListObjects("Table1")
lo.Unlist
Modified text is an extract of the original Stack Overflow Documentation
Licentie onder CC BY-SA 3.0
Niet aangesloten bij Stack Overflow