James Bond

Prueba con quitar duplicados en la imagen puedes ver que los datos originales están en la columna B, los copias a la columna E, seleccionas del menu quitar duplicados y en las opciones eliges Fecha, después copias la columna E y F hacia la columna H,...

Prueba con esta macro MsgBox nombreHoja & " ya existe" Else MsgBox nombreHoja & " creada" End If On Error Resume Next Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = "detalle" On Error GoTo 0 Sheets("hoja1").Select End Sub Function...

Explica como llegas al 20 paso a paso, la imagen esta bien solo que no me queda claro como con caracteres alfanuméricos llegas a ese numero

Prueba esto Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target = Range("c2") And Target <> Empty Then ActiveSheet.Name = Target End If On Error GoTo 0 End Sub Solo ponlo en el modulo vba de la hoja1, cada que cambies...

Lo que pides es bastante complicado implica saber programar en VBE y directamente no se puede copiar se tiene que usar exportar el formulario, renombrar el original, importar el formulario, renombrarlo y devolver al formulario original su nombre...

No necesitas fórmula usa los filtros o filtros avanzados en ellos puedes elegir las condiciones de filtrado ya sea entre tal fecha y tal fecha o a partir de tal fecha y arrendatario, puedes hacer infinidad de condiciones de filtrado y te mostrara los...

Yo lo haría así, esta macro lee todos los objetos del formulario y se enfoca en los textbox cuando los identifica entonces comprueba que son numéricos de ser así realiza la suma colocando el resultado en la variable X Private Sub...

Prueba con esta macro, como no mencionaste en que columna tienes la fecha yo asumí que eran en la columna 5 (f), así que cambia este criterio si la tienes en una columna diferente una vez que filtra la fecha realiza la copia hacia la hoja2 Sub...

Este es el resultado de la macro, la macro buscara lo que pongas en el combobox incluyendo una sola letra y te mostrara solo los resultados positivos en el listbox, los cuales cargara con todo y títulos y esta es la macro Private Sub...

Prueba con esta macro Sub copiar_n_veces() filas = Range("b1").CurrentRegion.Rows.Count Set datos = Range("k4:k6") For i = 1 To filas If i = 1 Then Set destino = datos.Rows(4).Resize(3) If i > 1 Then Set destino = destino.Rows(4).Resize(3)...