Janlui

No entiendo la pregunta

ok. mil disculpas

Observa el correo y le falta un caracter del lado izquierdo (en algunos)

Espero y esto sea la solución. prueba (2).xlsm

Cada que vayas recorriendo el TXT , pregunta el largo de la fila y asi determinaras que tratamiento le drás. Pero sube tu archivo.

Antoni no puede pensar en retiros... el es MODERADOR PERPETUO.

Espero que este ejercicio te de una idea para tu primer paso. VENTA DE CAJAS.xlsx

PODRIASD PROPORCIONAR LA VARIEDAD E SABORES?

Puedes compartir tu archivo para dar un primer paso a la solución

Tiene como tope 12 movimientos... dale una revisada a cada caso 34 Certificados.pdf

El 00/100 es cuando existan centavos.

Pero no comentas que hacen con ese certificado... primero todo en un archivo word, despues individual, no queda claro. Si finalmente cada Certificado lo mandas por mail... entonces que genere PDF individual.

Si se hace sobre excel, sería mucho mas facil y esta seria un ejemplo de salida:

Crea una carpeta y coloca estos 2 archivos.

Comentarios: - No hacer cambios en Plantilla - Hay un Botón para procesar la información - Al procesar cada Certificado, se abre Word, genera los cambios - Saldrá un mensaje si se desea continuar, para ello hay que renombrar el Word y Cerrar. Haz prueba y me comentas. Caso de ayuda excel 2.xlsm Plantilla.docx

Felicidades por destacado nombramiento...

Este es un ejemplo de CERTIFICADO con Macro

Pregunta: En la base que proporcionas hay 34 Certificados.... quieres que se generen 34 archivos word? Observo que HUMBERTO PATRICIO PAVEZ SOTO tiene 15 registros... cual seria el numero máximo a preever.

Otra posibilidad es que el certificado pase de excel a PDF

Yo veo esto en el XML en esta factura 1549 y tu tienes otra cifra en tu hoja MKT

No vi tu proceso para extraer

Te refieres a esto? Ayuda grupos y subgrupos.xlsx

Lo que veo que la factura 1549 tiene 4 importes y en tu Hoja MKT tienes solo 1 y no da la suma de la factura... es correcto?

Los archivos XML deberán estar en la misma carpeta del archivo Excel. Sub EXTRAE() Sheets("READFACT").Select Range("A1:ZZ10000").ClearContents RUTA = "TEXT;" & ActiveWorkbook.Path & "\" Dim ARCH(2) As String ARCH(1) = "D77368930-KD033F0000001548.xml" ARCH(2) = "D77368930-KD033F0000001549.xml" For I = 1 To 2 Cells(1, I) = ARCH(I) ARCHIVO = ARCH(I) With ActiveSheet.QueryTables.Add(Connection:=RUTA & ARCHIVO, Destination:=Cells(4, I)) .Name = ARCHIVO .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .TextFilePromptOnRefresh = False .TextFilePlatform = 1252 .TextFileStartRow = 1 .TextFileParseType = xlDelimited .TextFileTextQualifier = xlTextQualifierDoubleQuote .TextFileConsecutiveDelimiter = False .TextFileTabDelimiter = True .TextFileSemicolonDelimiter = False .TextFileCommaDelimiter = False .TextFileSpaceDelimiter = False .TextFileColumnDataTypes = Array(1) .TextFileTrailingMinusNumbers = True .Refresh BackgroundQuery:=False End With Next End Sub Espero te sirva

Sube tu archivo excel con tu macro y 2 ejemplos (archivos) XML