Saltar al contenido principal

¿Cómo comprobar si un año es bisiesto en Excel?

¿Sabes cómo determinar si un año es bisiesto o no? En Excel, no existe un método directo para verificarlo, pero puede crear una función o fórmula definida por el usuario para resolver este problema.

Compruebe si un año es bisiesto con fórmula

Compruebe si un año es bisiesto con la función definida por el usuario


flecha azul burbuja derecha Compruebe si un año es bisiesto con fórmula

Suponiendo que tiene una lista de años en la hoja de trabajo, la siguiente fórmula larga puede ayudarlo a determinar si un año determinado es bisiesto o no. Por favor haz lo siguiente:

1. Además de las celdas del año, en una celda en blanco, ingrese esta fórmula:

= SI (OR (MOD (A2,400) = 0, AND (MOD (A2,4) = 0, MOD (A2,100) <> 0)), "Año bisiesto", "NO es un año bisiesto"), (A2 contiene el año en el que desea aplicar esta fórmula, puede cambiarla según sus necesidades) ver captura de pantalla:

doc-comprobar-si-año bisiesto-1

2. Luego arrastre el controlador de relleno hasta el rango en el que desea que contenga esta fórmula, y todos los años se han verificado si son años bisiestos o no.

doc-comprobar-si-año bisiesto-1

Note: Si la celda relativa está en blanco, esta fórmula también mostrará el año bisiesto.


flecha azul burbuja derecha Compruebe si un año es bisiesto con la función definida por el usuario

También puede crear una función definida por el usuario para verificar si el año es bisiesto, puede completarlo de la siguiente manera:

1. Mantenga pulsado el ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para aplicaciones.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.

Código VBA: verifique si un año es bisiesto

Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
   IsLeapYear = True
Else
   IsLeapYear = False
End If
End Function

3. Luego guarde y cierre este código, regrese a su hoja de trabajo e ingrese esta fórmula: = año de islea (A2), vea la captura de pantalla:

doc-comprobar-si-año bisiesto-1

4. Luego, arrastre el controlador de relleno a las celdas que desea que contengan esta fórmula, y todos los años se han marcado, el FALSO significa no un año bisiesto y el VERDADERO indica un año bisiesto. Ver captura de pantalla:

doc-comprobar-si-año bisiesto-1


Artículo relacionado:

Encuentre el mínimo común denominador o el mayor factor común en Excel

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!

 

Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
ivec, your determination of a leap year within Excel itself works if the year is at / later than the Excel base year of 1900. For years before the Excel base year of 1900, I believe an external determination is required.
This comment was minimized by the moderator on the site
What about relying on Excel's own definition of a leap year?
The expression below checks the difference between March 1st and Feb 28 in that year - a leap year will have Feb 29 in-betweek, which makes a difference of 2 days.
IsLeapYear formula: = ( DATE( $$YEAR_REF$$ ;3;1)-DATE( $$YEAR_REF$$ ;2;28) > 1.5 )

The 1.5 is because I'm not sure if there is a risk of floating-point inaccuracies...
This comment was minimized by the moderator on the site
Please don't post my previous comment.
This comment was minimized by the moderator on the site
Using Excel 2013 the VBA returns backwards, saying 2015 is a leap year and 2016 is not
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations