Find next cell in range with interior color

Hi,

I have a B2:M13 range. I would like to find a way to find the next cell with Interior.ColorIndex = 1.

For example, if position is currently B2 (so myrange(1, 1)) and the next black colored cell is on B6 (so myrange(5, 1)), I would like store 5 and 1 into variables.

So if no black background is found after current cell on the same row, look for next black background on next row.

If current cell is in row-M (the last one ** the range), for example, and there's no black background following on this row, find first black background in row-B.

Thank you so much!