Crear categorías dependiendo la fecha de nacimiento

Tengo una tabla con los campos FechaNacimiento y Categoría.
Actualmente tengo en un formulario un procedimiento de evento, después de actualizar, en el campo FechaNacimiento que pone esto:

Private Sub FechaNacimiento_AfterUpdate()
Edad = Format(Date - [FechaNacimiento], "yy")
Select Case Edad
Case Is <= 7
Categoría = "Mini / Piolín"
Case Is = 8, 9
Categoría = "Benjamin"
Case Is = 10, 11
Categoría = "Alevín"
Case Is = 12, 13

...

Case Else
Categoría = "Master 60"<br class="scayt-auto" data-scayt_autocorrection="Categoría" data-scayt_autocorrected="Categoria" /> End Select
End Sub

Esto lo que hace es que el campo Categoría se actualiza solo y no toco nada. Hasta aquí bien. Pero lo que quiero hacer es que si un año lo cambian no tenga que entrar en el código y reemplazar números, pues esto esta en varios formularios mas.

He intentado hacer una tabla aparte con los campos Id, Categoría, Años. Y aquí es donde he probado varias formas y no funciona ninguna, no se si lo hago bien o realmente no se enfocarlo. La pregunta es, como enfoco el campo Años para luego utilizarlo en el procedimiento de evento anterior? O he de utilizar otro código porque éste no me funcionara.

Estoy bloqueado.

Muchísimas gracias por adelantado.