Excel VB Help

[knightrider]

Morning,

 

I am trying to get a field on a excel file to increase each time the file is opened.

 

Attached is the file and I have tried inserting the following code into it.

 

Private Sub Workbook_Open()

Range("F3").Value = 1 + Range("F3").Value

End Sub

 

 

This I thought would increase the value of the cell by 1 each time the file is opened. However this isn't working and i have no idea why. I am literally ripping my hair out over this. I'm sure it’s really simple to do.

 

Any help much much appreciated.

 

Knightrider

Master1.xlsx

[Geoff]

I think you have to reference the worksheet too?

 

Worksheets("Sheet1").Range("A1").Value = Worksheets("Sheet1").Range("A1").Value + 1

[Steve21]

There's your issue "Master1.xlsx"

 

That's not a macro enabled file. It'll need to be a .xlsm

 

Just tested it and

 

Private Sub Workbook_Open()
Range("F3").Value = Range("F3").Value + 1
End Sub

 

In my test.xlsm using "Thisworkbook" and it works fine

 

Steve

Edited November 14, 2012 by Steve21

[Stuart_C]

I've copied your code into a workbook and it runs OK.

 

How about changing the name of the Sub to "AutoOpen" so it runs everytime it runs when the workbook opens. Possibly change it to an xlsm file which is what I've saved it as?

 

Blast beaten too it!

Edited November 14, 2012 by Stuart_C

[knightrider]

Thanks- got it working!