Dante Amor

H o l a: Puedes enviarme un archivo y me marcas en amarillo qué datos se tienen que enviar al nuevo archivo. Me envías el nuevo archivo de ejemplo en dónde copiaste las celdas en amarillo. Sal u dos

Te anexo las macros para llenar los textbox Private Sub ComboBox1_Change() 'Por.Dante Amor TextBox3 = "" TextBox4 = "" TextBox5 = "" TextBox6 = "" TextBox7 = "" If ComboBox1 = "" Then Exit Sub If ComboBox1.ListIndex = -1 Then Exit Sub f =...

H o l a: Te anexo un ejemplo, estoy poniendo el cuerpo del correo en la variable cuerpo, después pongo la variable en Htmlbody, y por último agrego nuevamente dam.htmlbody, de esa forma te pone un cuerpo y tu firma que tengas en outlook. Sub...

H o l a: Te anexo un ejemplo para agregar la firma del correo: Sub enviar_correo_con_firma() 'Por.Dante Amor Set dam = CreateObject("outlook.application").createitem(0) dam.Display dam.To = Sheets("Hoja1").Range("D2") dam.CC =...

H o l a: Te anexo la macro, debes tener creadas las hojas Hoja1, Hoja2 y CONSOLIDACION. Sub CopiarRango() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") Set h3 = Sheets("CONSOLIDACION") u =...

H o l a: Por la posición de las columnas, tal vez, te refieres a una de mis macros para enviar correos: La macro para la aplicación es la siguiente: '***Macro Para enviar correos Sub correo() 'Por.Dante Amor col = Range("H1").Column For i = 2 To...

H o l a: Puedes enviarme tu archivo y me explicas cómo están tus datos y qué quieres contar y qué esperas como resultado y en dónde quieres el resultado. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Santiago...

H o l a: Te anexo la macro Sub Concentrar() 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False Application.SheetsInNewWorkbook = 1 ' Set l1 = ThisWorkbook Set h2 = l1.Sheets("Hoja2") Set h3 = l1.Sheets("Hoja3")...

H o l a: He buscado sobre el tema y para VBA no he encontrado nada. Las recomendaciones son las mismas. Abrir el archivoRealizar los cambiosGuardar y cerrar el archivo. Las recomendaciones son que se haga en una aplicación de forma invisible, de esa...

H o l a: Te anexo la macro actualizada, le hice algunos cambios. En la "hoja1" te va a poner la información. En el mismo libro crea una hoja llamada "Hoja2", en esta hoja2, en la celda A2 pon la el nombre completo de la carpeta; en la celda B2 pon el...