Adding and repeating

[swilkie]

I was wondering if anyone knew how to have a macro take a numbered field, add +1 to the number, and then have a separate field where a number can be added that would then repeat that function a certain number of times.

Example: Field A1 has 57, and Field B1 has 5. End result would be that Field A1 counted up to 62 by ones, and other functions can be added to the macro such as printing and things. (this part I have figured out)

Any help would be greatly appreciated. Current macro is tedious to work through.

 

[onlyadrafter]

Hello,

something like this?

Sub ADD_TO_CELL_A1()
    For MY_COUNT = 1 To Range("B1").Value
        Range("A1").Value = Range("A1").Value + 1
    Next MY_COUNT
End Sub

 

[swilkie]

Hello,

something like this?

Sub ADD_TO_CELL_A1()
    For MY_COUNT = 1 To Range("B1").Value
        Range("A1").Value = Range("A1").Value + 1
    Next MY_COUNT
End Sub

This works perfectly. Thank you very much for the help.