I cannot get the macro to work. I can't say I'm really a macro expert. I
tried it using m as the form button, but it wouldn't work. If it's not too
much trouble, could someone explain the process? Microsoft Help didn't
really get it done for me...

"Corey" wrote:

Or you could try:
Sub Button1_Click()
With Sheet1
..Select
If activecell.Value < "" Then
activecell.Value = activecell.Value + 1
End If
End With
End Sub

which will add (1) to the cell that is selected whent he forms button is pressed.

Corey....

"Corey" wrote in message ...
Yes,

Sub Button1_Click()
With Sheet1 ' Changer to suit
..Select
If Range("A1").Value < "" Then ' Change A1 to suit
Range("A1").Value = Range("A1").Value + 1
End If
End With
End Sub


Corey....

"Excel Noob" wrote in message
...
Is there a way, via a macro or some such, that I could add one to the value
of a cell by pushing a button or something, rather than having to manually
change the value?