Object: 2DTableColumnText

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)


DIAdem 2015 Help
DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help

The 2DTableColumnText object provides a 2D table column in DIAdem REPORT. The table column takes its contents from a text list.

The following example generates a 2D table with a column and sets the column properties:

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()

WAS THIS ARTICLE HELPFUL?

Not Helpful