Object: 2DTableColumnTextItem
- Updated2024-09-12
- 1 minute(s) read
(2DTableColumnText | Collections) > 2DTableColumnTextList > Object: 2DTableColumnTextItem
Object: 2DTableColumnTextItem
The 2DTableColumnTextItem object provides a text from a text list from which a 2D table column in DIAdem REPORT takes the contents.
The following example generates a 2D table with a column and sets the column properties:
| VBScript | Python |
Dim oMy2DTable, oMyColumn, oMyPosition, oMyTextList, I Call Report.NewLayout() Set oMy2DTable = Report.ActiveSheet.Objects.Add(eReportObject2DTable,"My2DTable") Set oMyPosition = oMy2DTable.Position.ByBorder oMyPosition.Top = 30 oMyPosition.Bottom = 20 oMyPosition.Left = 20 oMyPosition.Right = 30 Set oMyColumn = oMy2DTable.Columns.Add(e2DTableColumnText) oMyColumn.Settings.Font.Color.SetPredefinedColor(ePredefinedColorBlue) Set oMyTextList = oMyColumn.TextList oMyTextList.Count = 5 For I = 1 to oMyTextList.Count oMyTextList(I).Text = "Row " & I Next oMy2DTable.Settings.IndexSettings.IndexMode = e2DTableIndexModeAutomaticMinimum Call Report.Refresh()