Buongiorno,
sono alle prese con una macro in Basic per selezionare un file di testo da cui importare i dati.
Di seguito il codice:
Dim fName As String
Dim file_dialog as Object
Dim status as Integer
Dim file_path as String
Dim init_path as String
Dim ucb as object
Dim filterNames(2) as String
filterNames(0) = "*.*"
filterNames(1) = "*.txt"
GlobalScope.BasicLibraries.LoadLibrary("Tools")
file_dialog = CreateUnoService("com.sun.star.ui.dialogs.FilePicker")
ucb = createUnoService("com.sun.star.ucb.SimpleFileAccess")
AddFiltersToDialog(filterNames(), file_dialog)
L’esecuzione mi restituisce il seguente errore sulla riga “AddFiltersToDialog”:
“Errore di sintassi BASIC. Atteso: =.”
Non riesco ad individuare il problema che fa scattare questo errore.