Función Contar.si en una macro
Quiero saber cuantos de estos datos empiezan por TRM y al ingresar uno nuevo le sume 1, es decir que el siguiente sería TRM-DIGS-3
1 Respuesta
Respuesta de James Bond
3
Prueba con esta macro
Sub celdas_combinadas()
Set datos = Range("a1").CurrentRegion
With datos
filas = .Rows.Count
.Columns(2).Formula = "=left(" & .Columns(1).Address & ",3)"
cuenta = WorksheetFunction.CountIf(.Columns(2), "trm")
Range("d1") = cuenta
.Columns(2).Clear
End With
End Sub
