Ocurrencias de año en Excel VBA

Hola, soy Miguel y esta vez os traigo un nuevo artículo.

A continuación veremos un programa en Excel VBA que cuenta el número de ocurrencias del año.

Localización:

Ocurrencias de año en Excel VBA

Nota: las fechas están en formato estadounidense. Primero los meses, después los días. Este tipo de formato depende de la configuración regional de Windows.

1. Primero, declaramos tres variables de tipo Integer. Una variable que llamamos yearCount, una variable que llamamos yearAsk y una variable que llamamos i.

Oscuro anoConte Cómo Entero, año Preguntar Cómo Entero, me Cómo Entero

2. Inicializamos yearCount con el valor 0 y yearAsk con el valor de la celda C4.

yearCount = 0
yearAsk = Rango ("C4"). Valor

3. Comenzamos un ciclo For Next.

Para i = 1 Para dieciséis

4. Ahora verificamos cada fecha y solo si el año de la fecha es igual al año ingresado en la celda C4, aumentamos yearCount en 1. Usamos la función Año para obtener el año de una fecha.

año (Celdas (i, 1). Valor) = añoPreguntar Entonces

yearCount = yearCount + 1
Aleta

5. No olvide cerrar el ciclo.

Entonces me

6. Finalmente, mostramos el total de ocurrencias del año. Usamos el operador & para concatenar (unir) dos cadenas.

MsgBox yearCount & "ocurrencias en el año" & yearAsk

7. Coloque su macro en un botón de comando y prueba.

Resultado:

Año Resultado de ocurrencias

Nota: Debido a que hicimos la variable yearAsk, puede simplemente contar el número de ocurrencias de año de otro año insertando otro año en la celda C4 y haciendo clic en el botón de comando nuevamente.

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Subir

Esta página utiliza Cookies. Más info