VBA перебор ВСЕХ выделенных строк в Excel

Формулировка задачи:

Подскажите, пожалуйста, как реализовать следующий цикл.
Строка 1 (выделенная)
Строка 2 (выделенная)
Строка 3 (не выделенная)
Строка 4 (выделенная)
Строка 5 (не выделенная)
Нужно выполнить цикл только среди выделенных строк и на каждом шаге получить значения одной из ячеек.
Dim i As Integar, FirstSelectRow as Integer
FirstSelectRow = ActiveCell.Row
For i = FirstSelectRow To (последняя выделенная строка)
...
(получение значения выделенной строки с индексом i)
...
Next i
Не нашел ни одного примера.
Из того, что смог найти:
ActiveCell.Row - Даст мне первую выделенную строку (но только первую)
ActiveCell.Offset - Смещение, но относительно всех строк, а не только выделенных.
Помогите, пожалуйста.
Большое спасибо.

Решение задачи: «VBA перебор ВСЕХ выделенных строк в Excel»

textual
                            Листинг программы 
                        

                            ...
    Debug.<font color="blue">Print</font> myrows(i) <font color="00AA00">'тут собственно можно rows(MyRows(i)).cells(1,1).value=<font color="teal">"Hello"</font></font>
    myrows(i) = <font color="teal">"Empty"</font>
    i = <font color="darkblue"><b>0</b></font>
...

                        