¿como se generan numeros consecutivos al abrir archivo nuevo?

Arturo,
De uma maneira simples:

Numero inicial numa celda , por exemplo O1=0

Código em VBA:

Sub Auto_Open()

Dim vNum As Integer

vNum = Range("O1").Value
Range("A1") = vNum + 1
Range("O1") = Range("A1")

End Sub

Sempre que abrires a spreedsheet, aumenta automaticamente 1 numero em A1.
JRod
Microsoft [MVP] - Excel
http://EXCELer.blogspot.com

______________________________________
"arturo" escreveu na mensagem
news:

necesito que aparesca un numero consecutivo cada que abra una hoja de
calculo.