Access - Duda en Acces, rellenar un campo

Amigos...necesito rellenar un campo de una tabla access, solo con el año de la fecha corta de otro campo...cómo puedo hacerlo??
Por ejemplo:
Campo 1: 22-12-2003
Necesito que en el Campo 2 aparezca automaticamente 2003 o el año que el usuario ingrese.

Muchas gracias.

En el evento Después de actualizar del campo1 pones
me.campo2=year(me.campo1)

Donde hago eso del evento en la tabla, en un formulario....donde??
soy nuevo por favor expliquenme con mas detalle...
muchas gracias de antemano.

David, no me importa explicarte alguna que otra cuestión pero te doy un consejo, antes de empezar con esto deberias leerte algun que otro manual (www.aulaclic.com) tiene un curso de access bastante bueno y gratis.
Cualquier cosa que te explique te sonará a chino y en cuanto a tu pregunta, no se donde quieres actualizar ese campo ¿En una consulta? ¿En un formulario ?.
Si estas en un formulario cada campo tiene sus propiedades y eventos y es ahi donde debes mirar lo que te he dicho.
Saludos desde Cádiz

Otra forma de hacerlo:
Abres las propiedades del Campo2 y en Origen del Control pones:

=Formato([Campo1];"aaaa")

Haciendo lo del origen de control aparece el siguiente mensaje:

"La expresion que introdujo tiene una sintaxis no válida
Omitió un operando o un operador, introdujo un carácter o coma no válidos o introdujo texto sin encerrarlo en comillas"

Puse exactamenten esto:
=Formato([Campo1];"aaaa")

¿Qué puede ser?
Gracias

Puede que tu Access no esté en Español, prueba con:
=Format(Campo2; "yyyy")
y si no te funciona prueba como te han dicho antes con
=Year(campo1)
Si tu Access estuviera en español, te debería traducir automáticamente Year por Año. A mi me funciona de ambas formas incluso aunque Campo1 no tenga formato fecha.

De todas formas sería conveniente que lo hagas por código en el Procedimiento de Evento Después de actualizar del Campo1, porque de esta forma que te indico, conviertes a Campo2 en un campo calculado (con su origen del control ocupado) y luego no podrás grabarlo en la tabla si necesitas hacerlo.

Private Sub_Campo1_AfterUpdate()
Campo2 = Format(Campo1, "yyyy") o Campo2 = Year(Campo1)
End Sub

Un saludo
Enrique

Esto es lo que tengo en el evento del campo 1:

Option Compare Database
Private Sub campo1_BeforeUpdate(Cancel As Integer)

Private Sub_campo2_AfterUpdate()
campo2 = Year(campo1)

End Sub

Está bien??

lo logreeeeeeeeeeeeeeeee
Así:
Private Sub campo3_AfterUpdate()
campo6 = Format(campo3, "yyyy")
End Sub

muchas gracias por la ayuda y la orientación!!!!

Así

Private Sub campo3_AfterUpdate()
campo6 = Format(campo3, "yyyy")
End Sub

Gracias por la ayuda amigos
Saludos desde Chile