Dante Amor

H o l a: Envíame tu archivo y me explicas con ejemplos y colores lo que quieres copiar de la hoja1 a la hoja2. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “juan perez” y el título de esta pregunta.

H o l a: La primera parte ya la entendí, quieres que copie después de la palabra "Departamento" hasta encontrar una celda con números, ¿es correcto? Ahora, ¿quieres qué busque otra palabra "Departamento" y copie los datos hasta encontrar otro número?

H o l a Ramon: Te anexo las macros para activar o desactivar el botón de "Control de formulario", según el contenido de una celda: Antes de poner en funcionamiento las macros, necesitamos conocer algunos datos: El nombre de la hoja donde tienes el...

H o l a: Te anexo la macro para buscar los valores entre las palabras "febrero" y "marzo" Sub BuscarMeses() 'Por.Dante Amor Set h1 = Sheets("Hoja1") 'hoja con datos Set h2 = Sheets("Hoja2") 'hoja con resultados h2.Columns("A").ClearContents ' j = 2 u...

H o l a: Para hacer la macro necesito varios datos: En el primer libro, ¿cómo se llama la hoja que tiene los datos?¿En qué columna está el título "estado"Cómo se llama el segundo libro?¿Cómo se llama la hoja del segundo libro?Cómo se identifica el...

H o l a: Cambia esta línea Application. ActivePresentation. Save Por esta: Application. ActivePresentation. SaveCopyAs "respaldo"

H o l a: Supongo que las columnas a comparar son las mismas: D y E; y en la columna F el resultado: Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Por.Dante Amor If Target.Row < 5 Then Exit Sub If Target.Count > 5 Then Exit Sub...

H o l a: En tu compra tienes varios productos. Por ejemplo, compras 5 productos. Lo que va a hacer la macro es leer cada producto y agregarlo al inventario. Qué debe hacer la macro si uno de esos 5 productos no existe en la hoja inventario: a) No...

H o l a: Pon la siguiente macro en los eventos de tu hoja: Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 'Por.Dante amor UserForm1.Show End Sub Cuando presiones un hyperlink en automático se abrirá el userform1. Sigue las...

H o l a: Te anexo la macro con los cambios para enviar el pdf por correo. Cambia en la macro B2 por la celda que contiene el correo del destinatario; cambia B3 por la celda que contiene el nombre. Sub carga_de_datos() Sheets("Hoja4").Select...