Есть кусок кода:

Sub proba()
Dim n, m As Integer
n = 4
m = 12

Cells(m, n) = Cells(21, n + 4) * 100
...

End Sub

подскажите, что нужно добавить (или убавить/исправить), чтобы этот код исполнялся только для выделенных строк, причем выделенные строки не обязательно следуют друг за другом.