víctor ibarz

Revisa la fórmula, puedes ver que hay un "if" mal escrito.

Casi seguro que se podrá resolver con fórmulas. Por favor, pon algún ejemplo de lo que quieres conseguir porque no queda claro, creo que hay un error en la fórmula que has puesto, en la parte final, que debería ser "A3;1);3)".. ¿puede ser?

Sería algo así: Dim mRange As Range Dim cell As Range Set mRange = Worksheets("Hoja7").Range("A1:C10") Dato = Application.WorksheetFunction.Min(mRange) For Each cell In mRange If cell.Value = Dato Then cell.Interior.Color = RGB(255, 0, 0) cell.Select...

Todo es posible, pero con estas explicaciones tan poco precisas es casi imposible que la solución propuesta se ajuste a lo que solicitas.

Para cambiar el nombre de una hoja utiliza la propiedad "name" del objeto worksheet. Simplemente iguala al valor de la celda que quieras: ThisWorkbook.Worksheets(2).Name = ThisWorkbook.Worksheets(1).Range("a1").Value Aquí estamos renombrando la...

Puedes utilizar las fórmulas "contara" que cuenta las celdas ocupadas de un rango y la fórmula "contar.blanco", que cuenta las celdas en blanco de un rango..

Algo así serviría: vm = MsgBox("Atención!" & vbCrLf & vbCrLf & "¿Estás seguro de querer ejecutar la macro?", vbCritical + vbYesNo) If vm = vbNo Then MsgBox "Macro cancelada" Exit Sub End If

Prueba con esto: =SI.ERROR(BUSCARV(valor(A4),dbListSales!A:J,7,0),"")

Para eliminar los duplicados la funcionalidad de excel "Quitar duplicados" del menú "Datos" te serviría. Posteriormente con un formato condicional para cada columna podrías resaltar los valores duplicados. Si te hace falta sí o sí una macro, también...

En este enlace puedes descargar de forma gratuita un complemento que hace exactamente lo que quieres, en el mismo enlace está bien explicado como utilizarlo.