Macro Help Please

[jespl1]

I need to create a macro that will take a value in cell A1 and add 1 to it, and put the new value back into cell A1, then print the page. It should then add 1 to cell A1 again, putting the new value back into cell A1 and print again. It should repeat this process untill cell A1 reaches a certain value and then stop.

Any help at all would be very appreciated.
thank you

[TomHinkle]

Record a macro where you select A1, add 1 to it, then print the page.

That is the meat of the macro.

Around that you will have to use a loop. The easiest for a beginner is
probably a For...Next loop

Basically in your macro add this line AFTER the line that says PUBLIC Macro1()
but before any of the other commmands:

For I = 1 to 100 (or however many you want to go)


Then add the following line right before the line that says END SUB

Next


If not, look up a for next loop



"jespl1" wrote:

>
> I need to create a macro that will take a value in cell A1 and add 1 to
> it, and put the new value back into cell A1, then print the page. It
> should then add 1 to cell A1 again, putting the new value back into
> cell A1 and print again. It should repeat this process untill cell A1
> reaches a certain value and then stop.
>
> Any help at all would be very appreciated.
> thank you
>
>
> --
> jespl1
> ------------------------------------------------------------------------
> jespl1's Profile: http://www.excelforum.com/member.php...o&userid=27451
> View this thread: http://www.excelforum.com/showthread...hreadid=469610
>
>

[Jim Thomlinson]

Sub IncrementAndPrint()
Dim lngCounter As Long
Dim wks As Worksheet

Set wks = ActiveSheet
For lngCounter = 1 To 5
wks.Range("A1") = wks.Range("A1") + 1
wks.PrintPreview 'Change to wks.Printout
Next lngCounter
End Sub
--
HTH...

Jim Thomlinson


"jespl1" wrote:

>
> I need to create a macro that will take a value in cell A1 and add 1 to
> it, and put the new value back into cell A1, then print the page. It
> should then add 1 to cell A1 again, putting the new value back into
> cell A1 and print again. It should repeat this process untill cell A1
> reaches a certain value and then stop.
>
> Any help at all would be very appreciated.
> thank you
>
>
> --
> jespl1
> ------------------------------------------------------------------------
> jespl1's Profile: http://www.excelforum.com/member.php...o&userid=27451
> View this thread: http://www.excelforum.com/showthread...hreadid=469610
>
>