Application-defined or object-defined error in VBA

It appears this line of code is giving me an application-defined or object-defined error:

Please Login or Register  to view this content.

This is what the entire subroutine looks like:

Please Login or Register  to view this content.

It's intentions are simple. Given column A1 looks like this:

1
2
3
4
1
2
3

Whenever I hit a number, where the next number starts over again, I just want to copy that last number to the next column:

1 4
2 4
3 4
4 4
1 3
2 3
3 3

My code should be doing this, but I am stuck because I don't know why this application-defined error is occurring.

It appears you were right. I just had to initialize the variables to 1 rather than 0. I was assuming the table was 0-indexed based.