Nicolas Koroll

Dante Amor respondió: Te anexo la macro con los cambios Sub copia_hojas3() '------------------ 'by niko ' '------------------ Application.DisplayStatusBar = True ' 'Act Por Dante Amor fecha = InputBox("Ingresa la fecha dd/mm/aaaa:", "COPIAR SOLAMENTE ESTA FECHA") If fecha...

Dante Amor respondió: ¿Quieres copiar la línea en la misma hoja o son hojas diferentes? ¿Quieres copiarla o moverla al final?

Dante Amor respondió: Envíame tu archivo para revisar cómo poner la barra de progreso. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Nicolas Koroll” y el título de esta pregunta.

Dante Amor respondió: Tiene que ser con una macro. Las celdas a revisar son las de la columna D. Si en la columna D no tienes fórmulas, entonces pon la siguiente macro en los eventos de tu hoja Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not...

Dante Amor respondió: Pon la siguiente macro en los eventos de tu hoja Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target.Count > 10 Then Exit Sub For Each c In Target If c.Value = "hola"...