Maybe this stupid, but it will add me in sure project.

For example, select mouse any cell, and
I want, to :

Cells("A1").Value = Row
Cells("A2").Value = Col
' dim Row, Col as Integer
but,
Row = ???? (I don't know)
Col = ???? (I don't know)

Regards,
Andrzej