Ayuda con año, excel

Saludos a todos los expertos y usuarios de este portal.
Tengo un problemita aparentemente sencillo pero que me trae de un ala jaja. Necesito desplegar en una celda el año en curso. Lo estoy haciendo de la siguiente manera:
Private Sub Ano_AfterUpdate()
Dim fecha As String
fecha = Now()
Sheets("Presupuesto").Select
Range("B6").Select
    ActiveCell.FormulaR1C1 = Year(fecha)
End Sub
Guardo la fecha en la variable "fecha" por medio del now() y en la celda B6 de la hoja presupuesto esta la fórmula "Year(fecha)" para obtener el año en curso. Pero lo único que me despliega en la celda es 02/07/1905  12:00:00 a.m. En vez de desplegar unicamente 2010.
Ojala pudieran ayudarme saludos y gracias.
Respuesta
-1
Yo creo que lo que tienes que cambiar es el formato de la celda, que tiene formato de fecha, a "General", para que muestre realmente el año, que numéricamente no es una fecha sino parte de ella.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas