Adding 1 to field

  • Thread starter Thread starter Mjohnson
  • Start date Start date
M

Mjohnson

I have a spreadsheet that I use to track weekly reports.
There is a column titled Report Week and it needs to
increase by 1 every week. (The report weeks all have
different origination dates, so the number is not all the
same number in teh report week column. Currently, I have
to manually add 1 to every number. My spreadsheet is
large and this takes a very long time to do. Any advice
would be greatly appreciated.

Ex.

Field A Field B
Report Date Report Week
5.24.04 2
4.24.04 6
4.17.04 7


I want it to update to
5.24.04 3
4.24.04 7
4.17.04 8

THanks!
 
Enter a 1 in any blank cell, select the cell and press CTRL C (copy). Then
select the field, go to edit>paste special>add. and click ok, it will add 1
to any number in the field you selected.
 
Thanks so much! It worked great. One more thing. I set
it up as a Macro- is there a way that I can not have the
field updated if the field is null?

Thanks!
 
See if this helps
Sub addonetorange()
For Each c In Range("i1,j4,l2")
c.Value = c + 1
Next
End Sub
 
To answer your question on the macro

if c>0 then c.Value = c + 1
instead of
c.Value = c + 1
 
Back
Top