You need to have a blank cell to the right of the number you are adding
to, then select that blank cell hit the combined button assigned to
macro below.
Sub PlusOne()
ActiveCell.FormulaR1C1 = "=RC[-1]+1"
End Sub
--
comotoman
------------------------------------------------------------------------
comotoman's Profile:
http://www.excelforum.com/member.php...o&userid=27292
View this thread:
http://www.excelforum.com/showthread...hreadid=478309