Macro VBA que haga la función de (contar.si) en una tabla.

Hola muy bien día

Les pido la colaboración que me ayuden con esta macro, tengo 0 conocimientos de macros por eso siempre busco a ustedes que me ayudan y estoy muy agradecido :)

El ejercicio que subo es a manera de ejemplo ya que la voy a utilizar en otro archivo con otras tablas más grandes pero básicamente con que funcione aquí, yo podría en la macro reemplazar los rangos; celda de criterio de búsqueda y celda a pegar resultado, quedaría sirviéndome a la maravilla.

Es muy sencillo, que la macro haga la función de "contar.si" PERO lo haga en la fila de acuerdo donde yo este seleccionando, "solo en esa fila" NO EN TODA LA TABLA.

EJEMPLO: en la imagen que subí, esta seleccionada la celda "O2" entonces que al yo ejecutar la macro, pues busque el criterio de la celda "J2" en el rango "A2:H2" y su resultado lo muestre en la celda "M2", pero que a terminar la macro, no se mueva la selección de la celda "O2". Y si estoy seleccionando otra fila, pues haga la misma ejecución pero en la fila que yo este seleccionando.

Informo que las celdas de rango y criterio a buscar, están en formato TEXTO. Por si influye en algo

2 respuestas

Respuesta
1

Prueba esto:

Sub Contar()
  With ActiveCell
    Range("M" & .Row) = WorksheetFunction.CountIf(Range("A" & .Row & ":H" & .Row), Range("J" & .Row))
  End With
End Sub
Respuesta
1

Esto te puede aportar algo más

https://youtu.be/dE0asS8rEdM

https://youtu.be/VMGTJ6SVb0U

https://youtu.be/793MqY6oj18

https://macrosenexcel.com/como-contar-valores-con-macro-funcion

https://macrosenexcel.com/contar-datos-en-un-rango-funcion-counta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas