Return Row Index and Column Index of a Cell in a Range

Hi,

I want code like following:

Sub RowColIndex()

For Each Cll In Range("C4:E6")

    Cll.RowIndex
    Cll.ColumnIndex

Next

End Sub

Which return the row index and column index of each cell in range C4:E6 as in following table:

RowColIndex.PNG