Jump to content

JUANJG

Members
  • Posts

    47
  • Joined

  • Last visited

About JUANJG

  • Birthday 06/22/1990

Contact Methods

  • Website URL
    https://soyexcel.wordpress.com

Converted

  • Campos
    ;

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

JUANJG's Achievements

  1. Si estas usando el xml adjunto al inicio del tema solo debes cambiar el directorio del mismo, si estas usando otro xml debes ver que dentro de la seccion cdata contenga los nodos hijos a que esta apuntando la instruccion Dom.Child... Basicamente luego de abrir la seccion cdata ya puedes extraer laninformacion como lo haces en un xml normal.
  2. Excelente, era lo que estaba buscando. Muchas graciaaaas
  3. No es lo que necesito pero muchas gracias por la intención. La macro que colocas extrae el contenido de los nodos normalitos de un xml lo cual lo puedo realizar de diferentes maneras, pero NO la información de los nodos dentro de una sección CDATA que es lo que preciso.
  4. El archivo que intento leer NO es de CFDI NI se descarga de SAT por lo cual ninguna de las opciones me aplican. Gracias
  5. @DiegoLG En los ejemplos se extraen datos de nodos normales de xml, eso lo puedo hacer, lo que no he podido es extraer información de los nodos dentro de la seccion CDATA. Gracias
  6. @isidro, la pagina me lleva a una opción de descarga FCDI pero el archivo XML que estoy trabajando no tiene que ver con CFDI. Gracias
  7. @DiegoLG , cualquiera de los datos que esta dentro del CDATA para tomarlo como ejemplo ya que necesito extraer la mayoría. Por Ejemplo: Invoice/cac:AccountingSupplierParty/cac:Party/cac:PartyName/cbc:Name = PayU Colombia S.A.S Invoice/cac:LegalMonetaryTotal/cbc:LineExtensionAmount= 4902.63 Muchas Gracias
  8. Buen día, desde ya muchas gracias por su colaboración. Estoy tratando de leer o capturar la información contenida en el nodo Invoice que se encuentran en la sección CDATA del xml adjunto pero no lo consigo, he tratado con varios códigos pero ninguno me ha resultado por lo cual agradecería su valiosa ayuda con un pequeño ejemplo con cualquiera de los campos del nodo Invoice del xml adjunto. El ultimo código con el que intente es el siguiente: Sub My_Example_Test() Dim sXml As String sXml = "<Root><SomeData>foo</SomeData>" & "<SomeCDATA><![CDATA[< src=""C:\Users\HP\Desktop\ad08301097230342100195863.xml""/>]]>" & "</SomeCDATA></Root>" Dim Dom As MSXML2.DOMDocument60 Set Dom = New MSXML2.DOMDocument60 Dom.LoadXML sXml Dim xmlSomeCData As MSXML2.IXMLDOMElement Dim listanodos As MSXML2.IXMLDOMNodeList Set xmlSomeCData = Dom.SelectSingleNode("Root/SomeCDATA") Debug.Print xmlSomeCData.Text 'Deberia mostrar el texto pero muestra el directorio del xml 'creo esta parte no se esta ejecutando Set listanodos = Dom.SelectNodes("Invoice") For Each nodo In listanodos Debug.Print nodo.Text Next nodo End Sub Saludos Excelers ad08301097230342100195863.xml
  9. Juan,

    Hola! como estas ! estoy con una aplicación en excel que tiene un userform el cuál se activa al abrir el proyecto y no me muestra ninguna de las hojas del libro; sin embargo, cuando ya tengo un libro abierto y voy a abrir el del userform este me dice "Subscript out of range" y no me abre, pero cuando hago la operación y no tengo nada abierto funciona perfecto; estoy trabajando con un código que subiste en Sept 2015 y manejo office 2010...cualquier consejo sera bienvenido

  10. Sacando le el jugo a VBA

×
×
  • Create New...

Important Information

Privacy Policy