Diego Echegaray

Dante Amor respondió: H o l a: Te anexo la macro actualizada Sub InsertarVariosTxt() 'Por.Dante Amor Application.DisplayAlerts = False Application.ScreenUpdating = False Set l1 = ThisWorkbook Set h1 = l1.Sheets("Base") h1.Cells.Clear ruta = l1.Path & "\" txts =...

Dante Amor respondió: Tienes pendiente valorar esta respuesta: Macro "Subject" de mail desde excel

Raul Hernandez respondió: El código que te dejo Elsa Matilde en su respuesta, hace todo lo que solicitaste, de hecho la línea siguiente en ese código hace exactamente lo que me estas comentando, solo hazle los ajuste necesarios donde te lo indico Elsa Matilde. Range("D3")....

Dante Amor respondió: H o l a: Te anexo la macro actualizada. Sub correo() 'Por.Dante Amor ruta = ThisWorkbook.Path & "\" arch = "Macro para correos.pdf" For Each h In Sheets h.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=ruta & arch, _ Quality:=xlQualityStandard,...

Dante Amor respondió: H o l a: Te anexo la macro Sub InsertarVariosTxt() 'Por.Dante Amor Application.DisplayAlerts = False Application.ScreenUpdating = False Set l1 = ThisWorkbook Set h1 = l1.Sheets("Base") h1.Cells.Clear ruta = l1.Path & "\" txts = Array("Lima",...

Dante Amor respondió: H o l a: ¿Y entonces qué necesitas? La macro para generar un pdf por hoja. ¿O tú vas a crear los archivos? Para terminar la macro tienes que indicar de dónde se va a tomar el correo del destinatario para cada hoja. Qué se va a poner en el asunto del...