Как я могу сделать диапазон выделения листа Excel динамически

Question

Я хочу прочитать весь список ячеек макросом Excel с этим кодом:

Dim I as integer
For i = 5 To 10
str_LN = Range("A + Str(i)").Value
ts.WriteLine str_LN
Next i

Я получаю ошибку времени выполнения 1004.

Как я могу изменить этот код, чтобызаставить цикл работать?