The collection of column objects in this worksheet
VB: Property Get Columns As Columns
C++: Columns Columns
C#: Columns Columns
Sub Columns() Dim app As Origin.IOApplication Dim wks As Origin.Worksheet app = New Origin.ApplicationSI wks = app.FindWorksheet("") If wks Is Nothing Then MsgBox("Can not find active worksheet") Exit Sub End If Dim nCols As Integer wks.Columns.Add("z") 'add new column to wks nCols = wks.Columns.Count MsgBox(nCols) End Sub
8.0SR2