ник: snipe
dim Столбец as Long
dim Строка as Long
столбец=Cells(ti,tj).Column
строка=Cells(ti,tj).Row
хотя с другой стороны зачем искать номера столбцов и строк если для доступа к ячейке используются циклы а переменные циклов в данном случае и есть координаты ячейки (т.е Ваш Column и Row