Send Email Loop with increasing number till maximum increment reached then reset and End

Hi all,

I am trying to create an additional Sub that uses the below send email code that already works in the document
Im looking for it to complete a loop increasing the number each time within the designated cell then send the email again untill the number in the cell reaches the maximum number placed in a seperate cell.
An example of this would be the number increasing by one each time till it reaches the maximum of 61 before sending the last email and reseting the number to 1.

This will send an email with each increase so the events would be as follows,

Button Click >
Check Ready Status (If ["Don't Send"={Increase Cell Value & Check again}] ["Report Ready"={Send Email}) >
Increase Cell Value >
Check if over Maximum number (If Over value in L20=[Message: Sending Complete], Under or Equal to value in L20=[Loop to Check Ready Status])

Information Cells,
Cell for Increasing each time - L15
Cell with maximum number in - L20
Cell With Ready Status, "Don't Send" "Report Ready" - L10

Please Login or Register  to view this content.

Thanks in Advance

Originally Posted by cubangt

Seems you need something like this: (somewhat tested)

Please Login or Register  to view this content.

How would this fit into the initial send email code? Thanks