Hi John One concern , what if i open the workbook n didnt save it, next time whn i open the workbook it will reflect same number
try below code in Thisworkbook module Private Sub Workbook_Open() Sheets("Sheet1").Range("F2").Value = Sheets("Sheet1").Range("F2").Value + 1 End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Save End Sub Thanks Mahesh On Thu, Aug 11, 2011 at 3:05 PM, Rajan_Verma <rajanverma1...@gmail.com>wrote: > *You can use this :* > > *Private Sub Workbook_Open()* > > *Range("F2").Value = Range("F2").Value + 1* > > *End Sub* > > * * > > *From:* excel-macros@googlegroups.com [mailto: > excel-macros@googlegroups.com] *On Behalf Of *John A. Smith > *Sent:* Thursday, August 11, 2011 1:25 AM > > *To:* excel-macros@googlegroups.com > *Subject:* $$Excel-Macros$$ Add 1 to a cell every time the file is opened* > *** > > ** ** > > Excel guru's, can I make a receipt file that adds 1 to a specific cell > everytime the file is opened?**** > > **** > > Please see attached.**** > > **** > > Thank you.**** > > **** > > John**** > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/discussexcel**** > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/discussexcel > -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel