Put in ThisWorkbook module

Private Sub Workbook_Open()
[A1]=[A1]+1
End Sub

"ghost" skrev:

Greeting,
I have work book and I need this work book generates an auto number. For
example, when I open this sheet for the first time, A1 =1, next time =2 and
so on. Is that possible in excel???
Thanks!!