Dear all

I tried to customize my Online Table Control that contains many columns.

In order to be more efficient, i'd like to use VBA to give columns names, colors, ...

I tried VBA code (in attachment) in a button to test it in runtime, it's ok. But when i try the one in VBA, it give me anerror : "Object doesn't support this property or method".

Where is my problem???

***************************** Code VBA

Sub test1()

Dim obj

Set obj = ActiveDocument.HMIObjects("Control1")

For i = 0 To 10

obj.ValueColumnIndex = i <== ERROR : Object doesn't support this property or method
obj.ValueColumnCaption = i

Next

End Sub

***************************** Code Button

Sub OnLButtonUp(ByVal Item, ByVal Flags, ByVal x, ByVal y)

Dim test

Set test = HMIRuntime.ActiveScreen.ScreenItems("Control1")

For test1 = 1 To 10

test.ValueColumnIndex = test1
test.ValueColumnCaption = test1

Next

End Sub

Bizur

MFA

obj.ValueColumnIndex = i <== ERROR : Object doesn't support this property or method
obj.ValueColumnCaption = i

Next

End Sub

Try the following:

obj.properties("ColumnIndex") =1
obj.properties("ColumnCaption")=1

Best regards

Bizur

New question published by dionis is split to a separate thread with the subject How to add new value columns in VBA.

Best regards
Min_Moderator