Loopy循环通过Excel VBA中的范围

I am looping through a range in Excel VBA. I have an IF-Then that checks to see if the a cell contains a number. I then want the address of the cell that contains the number. The problem is my code returns the first cell with a number over and over. I am looping through a range in Excel VBA. I ha