Autonumerico

hola, Luis !

tengo una hoja de excel de presupuestos en formato de plantilla, con lo cual cada vez que la abro me aparece todo en blanco.
Hay una celda que es el no. de presupuesto y lo que quiero es que cada vez que abra la plantilla en la celda "no. de presupuesto"
me aparezca un numero correlativo con el a#o y cada vez que cambia el a#o, comience de 1.
Ej. 0001/2006 .xxxx/2006, 0001/2007 .xxxx/2007, etc.

suponiendo que tu hoja 'en formato plantilla' ES un complemento .XLA -?-

1) convendria si expones si actualmente ya estas 'autonumerando' tus presupuestos [y el como lo estas haciendo]
[ademas de en cual hoja y celda es que se pone el 'no. de presupuesto' y el formato numerico [si alguno personalizado] :)

2) en caso de que te este haciendo falta el 'procedimiento' completo...
-> puedes descargar [alguno de o los] dos complementos para 'autonumerar' plantillas en...
http://www.excelesp.com/descargas/c...racion.zip
http://www.excelesp.com/descargas/c...ciones.zip

3) si tu caso es mas 'sencillo'... y suponiendo que en la 'hoja_x' controlas el numero en 'A1' y el a#o en 'A2'
y luego lo pasas o concatenas o ... -> a la hoja y celda donde se pone el 'no. de presupuesto'...
prueba copiando las siguientes lineas en el modulo de codigo del libro [ThisWorkbook]
Private Sub Workbook_Open()
With Worksheets("hoja oculta")
If Year(Date) = .[a2] Then
.[a1] = .[a1] + 1
Else
.[a2] = Year(Date)
.[a1] = 1
End If
End With
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.