VB Code to create page break with criteria

Hello:

Please refer to attached file.
I need VB Code to create page break as follows.
1st page will be from text "TestStore in column A to row before next text "TestStore.
2nd page will be from 2nd text "TestStore in column A to row before 2nd text "TestStore and so on until 31 days.

Tried code below but somewhere logic is not correct to get me correct pagebreak.

Please Login or Register  to view this content.

i have highlighted some to show what should be on each page.

Let me know if you have any questions.
Thanks.

Riz

Like this?

Please Login or Register  to view this content.

Hello jolivanes:

Thanks a lot, it works for me.

Riz