Extraer nodos hijos de xml a excel mediante visual basic

Estoy modificando una rch. Para extraer información de un xml a excel

Solo que no puedo pasar los nodos hijos

Este es el código que ocupo para pasar la info del xml a excel

If Trim(Cells(2, y)) = "/cfdi:Conceptos/cfdi:Concepto/@Descripcion" Then
            descripcion = Cells(3, y)
            End If

esta es la imformacion del xml

 <cfdi:Conceptos>
        <cfdi:Concepto ClaveProdServ="11151511" ClaveUnidad="H87" Cantidad="200.00" Unidad="PIEZA" NoIdentificacion="L88" Descripcion="PLASTICO NATURAL DE 8.20m X 800 Galgas" ValorUnitario="120.36" Importe="24072.00">
        <cfdi:Impuestos><cfdi:Traslados><cfdi:Traslado Base="24072.00" Impuesto="002" TipoFactor="Tasa" TasaOCuota="0.160000" Importe="3851.52"/></cfdi:Traslados></cfdi:Impuestos>
                                    </cfdi:Concepto>
        <cfdi:Concepto ClaveProdServ="46182002" ClaveUnidad="H87" Cantidad="240.00" Unidad="PIEZA" NoIdentificacion="L97" Descripcion="MASCARILLA 3M, DESECHABLE, PARA POLVOS Y NEBLINA" ValorUnitario="14.50" Importe="3480.00"><cfdi:Impuestos><cfdi:Traslados><cfdi:Traslado Base="3480.00" Impuesto="002" TipoFactor="Tasa" TasaOCuota="0.160000" Importe="556.80"/></cfdi:Traslados></cfdi:Impuestos></cfdi:Concepto><cfdi:Concepto ClaveProdServ="46181545" ClaveUnidad="H87" Cantidad="215.00" Unidad="PIEZA" NoIdentificacion="L98" Descripcion="MANDIL DE MEZCLILLA CON BOLSA
NO CTA 4479" ValorUnitario="62.50" Importe="13437.50"><cfdi:Impuestos><cfdi:Traslados><cfdi:Traslado Base="13437.50" Impuesto="002" TipoFactor="Tasa" TasaOCuota="0.160000" Importe="2150.00"/></cfdi:Traslados></cfdi:Impuestos></cfdi:Concepto>
        </Cfdi:Conceptos>

La infcon el código que ocupo si puedo ver el primer concepto,

Pero en la información del xml hay más de dos conceptos

Añade tu respuesta

Haz clic para o