Jump to content

fjaimes04

Members
  • Content Count

    5
  • Joined

  • Last visited

About fjaimes04

  • Rank
    Newbie

Profile information

  • Gender
    Hombre

Converted

  • Campos
    ;
  • Mi versión de Excel:
    0,2
  1. con estas líneas de código en la ventana inmediato leo todo el contenido del xml, incluso el de la cdata, pero como haría para pasar dicho contenido en formato tabular a excel??🙄 Sub TestXML3() Dim XDoc As Object Set XDoc = CreateObject("MSXML2.DOMDocument") XDoc.async = False: XDoc.validateOnParse = False XDoc.Load (ThisWorkbook.Path & "\ad09004905940102100002111.xml") 'Get Document Elements Set lists = XDoc.DocumentElement 'Traverse all elements 2 branches deep For Each listNode In lists.ChildNodes Debug.Print "---Email---"
  2. Saludos me sale error 99, que no se la variable del objeto with no se ha establecido. Alguna sugerencia
  3. Hola a todos los que me puedan ayudar a resolver este problema. Buscando encontré este un código que lee archivos xml de un directorio seleccionado para luego pasarlo a una hoja de excel, el problema surgió cuando quise copiar todo el código en un archivo nuevo y proceder a testear, ya he revisado que tenga estén habilitadas las mismas referencias de las librerías, pero nada que encuentro el detalle. Una parte del código me daba interrupción en esta línea "ruta = LCase(CreateObject([explorador]).BrowseForFolder(0, "selecciona la carpeta a procesar", 0, "").items.Item.Path)" y lue
×
×
  • Create New...

Important Information

Privacy Policy