Function ReadDirectories, macros de libreoffice

[marcosAoo]

En el menu herramientas > Macros > Editar Macros, en las "macros y dialogos de openoffice" MODULO "UCB",

allí aparece una funcion llamada:

Código: Seleccionar todo

Function ReadDirectories(ByVal AnchorDir As String, bRecursive as Boolean,  bcheckFileType as Boolean, bGetByTitle as Boolean, Optional sFileContent(), Optional sExtension as String)

las preguntas son: ¿para que sirve? y ¿porque no logro hacerla funcionar desde la macro "main()"?

[fornelasa]

Todas esas macros están disponibles en tu archivo de hoja de calculo usando la instrucción:

Código: Seleccionar todo

GlobalScope.BasicLibraries.LoadLibrary("Standard")

Sirve para leer archivos.

Por ejemplo: Macro para sistema operativo Windows

Código: Seleccionar todo

Sub Main()
GlobalScope.BasicLibraries.LoadLibrary("Standard")
Dim oArray
oArray = ReadDirectories("C:\Federico\", False, False, False)
largo = Ubound(oArray)
For a = 0 To largo
msgbox oArray(a)
next
End Sub