BASIC runtime error. Sub-procedure or function procedure not defined

basic
calc

asked 2018-11-02 21:24:59 +0100

student
27 ●9 ●11 ●14

I tried the following test macro in libreoffice, but get an error:

"BASIC runtime error. Sub-procedure or function procedure not defined"

Function Test(x)
Test=Round(x^(0.5),1)
End Function

How can I fix it?

edit retag flag offensive close merge delete

add a comment

1 Answer

Sort by » oldest newest most voted

answered 2018-11-02 21:38:20 +0100

Ratslinger

16328 ●8 ●29 ●98

updated 2018-11-02 21:39:25 +0100

Hello,

Round is a function called from the sheet. You can use these in macros but must do so by a call using arguments:

Function Test(x)
    oFunction = createUnoService("com.sun.star.sheet.FunctionAccess")
    dim aArgument(1) as variant
    aArgument(0)=x^(0.5)
    aArgument(1)=1
    Test = oFunction.callFunction( "Round", aArgument() )
End Function

edit flag offensive delete link

Comments

Thanks, is there also a function accessible directly from basic which does the same as the round function from the sheet?

student ( 2018-11-02 22:17:26 +0100 )edit

Don't see any command in Basic for that.

Ratslinger ( 2018-11-02 22:28:27 +0100 )edit

add a comment

Question Tools

1 follower

Stats

Asked: 2018-11-02 21:24:59 +0100

Seen: 452 times

Last updated: Nov 02 '18

BASIC runtime error. Sub-procedure or function procedure not defined edit

1 Answer

Comments

Question Tools

Stats

Related questions

BASIC runtime error. Sub-procedure or function procedure not defined