Calcular edad con una macro

[David]

Podría ser algo como esto:

Código vb:

Año = DateDiff("yyyy", Fecha1, Fecha2)
If Month(Fecha2) < Month(Fecha1) Or _
        (Month(Fecha2) = Month(Fecha1) And Day(Fecha2) < Day(Fecha1)) Then
    Año = Año - 1
End If