Elsa Matilde

Para aborrar las celdas de la fila seleccionada: x = ActiveCell.Row 'suponiendo que intentas eliminar la fila de la celda activa Range("A"& x & ":G" & x).ClearContents Range("I"& x & ":I" & x). ClearContents 'si hubiese que borrar también la de...

En primer lugar te recuerdo que la consulta Ocultar hojas sin dañar macros sigue aún pendiente de que la finalices o comentes si es que necesitas que te ajuste la macro. Creo haberte recomendado el video 11 de mi canal. También podrías leer el mismo...

Así debiera quedar tu macro. Tenía algunos errores de sintaxis. Private Sub UserForm_Initialize() ' CREAR UN CONTROL ACTIVEX IMAGE Dim Image1 As MSForms.Image Set Image1 = Me.Controls.Add("FORMS.Image.1", "Image1") Image1.Top = 126 'EMPIEZA ARRIBA...

No se comprende muy bien la situación. Se recibe un archivo Excel... se llenan algunos campos ... y luego se imprime. Entonces, ¿qué significa que 'quita algo de tiempo en estar llenando a mano (pluma) ese formato para después entregarlo'...? Y si...

Solo deseo aportar un comentario atenta a que mencionas 'y que se pueda modificar en un futuro, La instrucción Sheets(índice) toma las hojas en el orden en que se encuentran las pestañas. Por lo tanto el bucle For i = 1 to 12 es correcto para...

Hay muchos modos de enviar un correo. Te dejo un código adaptación de un tema del capítulo 'Correos' de mi manual 500Macros. Está probada en versión Office 2016. Sub EnviaCorreo() 'x Elsamatilde Dim myOLApp Dim myOLItem Dim olMailItem Dim midire As...

Te invito a mirar el video 11 de mi canal donde muestro otros casos y modos de reducir el número de instrucciones en macros. Sdos. Elsa

Desde la sección Ejemplos de mi sitio podrás descargar 3 libros con macros que comparan 2 tablas. Si bien allí la tarea fue eliminar o formatear registros encontrados, te servirán para adaptarlos a tu caso de copiar información encontrada. Si luego...

Te respondí en consulta anterior ya que parecía más clara. Con esa macro podrás obtener y guardar luego la ruta de un archivo seleccionado. Ahora, si luego necesitas guardarlo como para dar un clic y abrir ese libro tendrás que guardarlo con su...

Entra al Editor de macros (con teclas ALT + F11) Inserta un módulo y copia allí el siguiente código: Sub listaHojas() 'x Elsamatilde 'se guarda la lista en Hoja2, col A 'ajustar Sheets("Hoja2").Columns("A:A").Clear 'borra datos anteriores X = 1...