Цикл через ячейки Excel требует наличия как минимум 2 активных ячеек

Question

Я пытаюсь распечатать содержимое ячеек в текстовый файл в заданном формате c. Все работает нормально, если у меня не заполнено хотя бы 2 строки. Если у меня только 1, происходит сбой. Кто-нибудь может мне помочь, пожалуйста? Большое спасибо! Код ниже:

Sub exportBanners()

    Dim FileName As String
    FileName = ThisWorkbook.Path & "\MT_BANNERS_" & Format(Now, "ddmmyy-hhmmss") & ".txt"

    Dim c As Range, r As Range
    Dim output As String

    Dim lRow As Long
    Dim lCol As Long

    lRow = Cells(Rows.Count, 1).End(xlUp).Row

        For Each r In Range("A9:B9", Range("A9:B9").End(xlDown)).Rows

            For Each c In r.Cells

                 output = output & "|" & c.Value

            Next c
            output = output & vbNewLine

        Next r

    Open FileName For Output As #1

    Print #1, output

    Close

    MsgBox "MT BANNERS requested successfully!"

End Sub