Ler XML com VBA do Access

Leitura de arquivo XMLAprenda a desenvolver sistemas completos no Microsoft Access, com o curso de access 2007 oferecido pela Cursos 24 Horas.

Foi um pouco complicado entender o funcionamento da leitura de um arquivo XML em VBA.

Porém após muita luta, finalmente foi possível compreender como funciona o processo de leitura.

Neste artigo você poderá obter o código para ler arquivo xml com VBA no Access. Antes de ver o código referencie a biblioteca Microsoft XML V3.0. Para referenciar, dentro do editor de VBA do Access, acesse o menu (Ferramentas > Referências).

Ler arquivo XML usando VBA

Dim xmlDOM As DOMDocument ‘ Variável de manipulação de documento

Dim strArquivo As String ‘ Nome e caminho do documento

Dim objNodes As IXMLDOMNodeList ‘ Lista de nós

Dim variavel As String

‘O objeto DOMDocument deve ser usado para manipular dados XML:

Set xmlDOM = CreateObject(“MSXML2.DOMDocument”)

‘ Retira a propriedade assincrona do objeto

xmlDOM.async = False

‘ Carrega o arquivo especificado para o objeto DOMDocument:

xmlDOM.Load “Arquivo.xml”

‘ Carrega dados da XML para uma variável qualquer

Set objNodes = xmlDOM.selectNodes(“/procEventoNFe/retEvento/infEvento/nProt”)

variavel = objNodes.Item(0).Text

Explicação sobre o código

Os dados devem ser obtidos diretamente através do endereço completo dos nós. Por exemplo:

<pai><filho><neto><nome type=”Primeiro Nome”>Matheus</nome></neto></filho></pai>

Para acessar o nome do neto, é necessário então indicar o caminho: /pai/filho/neto/nome

Caso seja necessário acessar uma propriedade no nome, então chamariamos assim: /pai/filho/neto/nome/@type

Caro leitor, você conseguiu aprender a ler um arquivo XML com VBA? Deixe seu comentário e compartilhe este artigo nas redes sociais!

Referência: Ambiente Office

Autor: Matheus Pellizzaro

Matheus é formado em sistemas de Informação pela UDESC, desenvolve sistemas e páginas de internet para empresas e pessoas físicas nas "horas vagas". Maiores detalhes em www.tecnozen.com.br