Dante Amor

Puedes poner el ejemplo completo con los resultados para cuando son 3 días.

H o l a: Te anexo la macro para pegar la imagen. Antes de ejecutar la macro, primero copia la imagen de internet, regresa a excel, selecciona la celda en dónde quieres la imagen, ejecuta la macro. Sub PegaImagen() 'Por.Dante Amor dire =...

H o l a: Envíame tu archivo y me explicas cómo funciona, qué error te envía y en dónde se detiene la macro. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Juan Marcelo Rios Ricalde” y el título de esta pregunta.

H o l a: Te anexo la macro actualizada. El resultado te lo pone en la fila 2, empieza en la columna A, el siguiente resultado en la misma 2 pero en la columna B, luego la C, etc. Sub Macro1() 'Act.Por.Dante Amor Set h1 = Sheets("TxvsFunct") Set h2 =...

H o l a: Te anexo la macro Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Por.Dante Amor Set r = Range("C5:E10") i = r.Cells(1, 1).Row f = r.Rows.Count + i - 1 With r.Font .ThemeColor = xlThemeColorDark1 .TintAndShade = 0 End With If...

H o l a: Pon la siguiente macro en los eventos de tu hoja Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("C:E")) Is Nothing Then Columns(Target.Column).ColumnWidth = 33.57 Else...

La macro funciona si en la hoja 1 tienes encabezados en la fila 1: En la hoja2 el resultado quedará así: La macro: Sub CopiarTranspuesto() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2")...

H o l a: Entiendo que los datos en la hoja empiezan en la fila 2. Te anexo la macro Sub CopiarTranspuesto() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") h2.Cells.Clear h1.[A1:B1].Copy h2.[A1]...

Te anexo la macro para abrir los 2 libros, copiar el rango "B7:AB55", del libro1 "formatoNOK" al libro2 "formatoOK", guarda el libro2 y cierra los 2 libros. Pon la macro en un libro nuevo. Los 2 libros deben estar en la misma carpeta:...

Te anexo 2 alternativas que realicé: Macro para genear un pdf por cada línea de excel Datos de excel a formulario rellenable pdf -para dante Sal u dos