Estoy siguiendo el manual de Maurio sobre Ooo Basic, en una de las macros que referencia me lanza un error que no he sido capaz de solucionar. He estado buscando sobre el problema y no consigo ninguna pista por la que continuar, he comprobado que la macro sea correcta en varias publicaciones. Les rogaria me echaran un cable, aunque sea al cuello jjjjj. Gracias por anticipado.
Sistema Operativo:
Linux 3.16.0-4-amd64 #1 SMP Debian 3.16.51-2 (2017-12-03) x86_64 GNU/Linux
Aplicación:
LibreOffice Version: 4.3.3.2 Build ID: 430m0(Build:2)
Macro:
Código: Seleccionar todo
Sub Sumando2()
Dim mDatos() As Integer
Dim iSuma As Integer
'Llenamos la matriz con la funcion Array
mDatos() = Array(10,20,30,40,50,60,70,80,90)
MsgBox mDatos( 0 )
'Intentamos sumar la matriz
iSuma = SumaMatriz( mDatos() )
MsgBox Str( iSuma )
End Sub
Function SumaMatriz ( Datos() )
Dim co1 As Integer
For co1 = LBound( Datos() ) To UBound( Datos() )
SumaMatriz = SumaMatriz + Datos( co1 )
Next
End Function
BASIC syntax error.
Sub procedure or function procedure SumaMatriz already defined.
Help
Danielmm