Function eval for libreoffice, openoffice como la eval de expresiones string en Excel

Function eval for libreoffice, openoffice como la eval de expresiones string en Excel

Function Eval(X As String) As Variant   

   Dim oCell As Object

   oCell = ThisComponent.getSheets().getByIndex(0).getCellByPosition(10, 0)

   oCell.formula = "=" & X

   Eval =   oCell.value

End Function

Esta ensayada y funciona

https://forum.openoffice.org/en/forum/viewtopic.php?f=9&t=3497