Olá a todos, estou com dificuldade de configurar uma Macro do VBA no Libreoffice.
Quando executo a mensagem é
LerXml.ods (568.9 KB)
Erro de execução do BASIC.
‘1’
Type: com.sun.star.script.CannotConvertException
Message: [automation bridge]UnoConversionUtilities::anyToVariant
Cannot convert the value of type :“ooo.vba.msforms.XControl” to the expected Automation type of VARTYPE: 8
VBA e Basic são linguagens diferentes, apesar de possuírem semelhanças.
.
Vi no arquivo que todos os módulos estão com a opção de compatibilidade ativada. Mas, às vezes, isso não é suficiente.
.
O ideal é que se adeque o código ao suíte de escritório (Excel ou Calc) que utiliza.
.
Consegue indicar em qual linha do código esse erro aparece?
Oi Felipe, obrigado por disponibilizar seu tempo para me auxiliar.
Ontem não consegui descansar até tarde tentando kk.
O erro mudou, agora está nas variáveis de importações, pelo menos aparece para selecionar a pasta
Erro de execução do BASIC.
‘423’
Show
LerXml.ods (571.0 KB)
linha 29 do formulário frm_LerNfe
No Basic você precisa declarar e instanciar os objetos.
Segue exemplo do código que chama o formulário, mas precisa adicionar os demais elementos ao diálogo.
Sub PastaXmlNFe()
Dim Dlg As Object
Dim frm_LerNfe As Object
DialogLibraries.loadLibrary( “VBAProject” )
Dlg = createUnoDialog(DialogLibraries.VBAProject.getByName(“frm_LerNfe”))
frm_LerNfe = Dlg.getModel(“frm_LerNfe”)Dlg.execute Dlg.disposeEnd Sub
LerXml.ods (598.8 KB)
Vídeo da planilha em Excel: LEITURA DO XML SAT POR EXCEL VBA - Fabio Mitsueda
Estou tentando fazer essas adaptações nessa planilha do vídeo.
Como não sei nada do Basic então to sofrendo um pouco kkk
Já é um avanço, com esse código consegui fazer abrir o formulário.
Obrigado WBastos.
