Basic Runtime Error 12 - OOo 3.3

[calpeda]

Hi,
i ve just installed OO 3.3 and when I try to execute my macro (working in previous 3.2) I got

"BASIC runtime error '12' ActiveSheet"

example:

costototale = ActiveSheet.Cells(i, 5).Value

In general I m getting a similar error everytime I m using ActiveSheet component.

May someone help me?
Thank you in advance.

[Hagar Delest]

Can you post the full code? Perhaps there is another parameter that needs to be changed in 3.3.

[Charlie Young]

Hi,
i ve just installed OO 3.3 and when I try to execute my macro (working in previous 3.2) I got

"BASIC runtime error '12' ActiveSheet"

example:

costototale = ActiveSheet.Cells(i, 5).Value

In general I m getting a similar error everytime I m using ActiveSheet component.

May someone help me?
Thank you in advance.

It would appear that you were formerly using some kind of VBA compatibility tool.

Code: Select all

costototale = ActiveSheet.Cells(i, 5).Value

In VBA, this refers to row i, column 5 on the ActiveSheet.

In OOo Basic, this would be

Code: Select all

costototale = ThisComponent.CurrentController.ActiveSheet.getCellByPosition(4,i - 1).Value

Since OOo coordinates are column first and 0 based.