Макрос выделения диапазона ячеек-объединение их в одну-переход на след.строку-повтор пред.действия - VBA

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

Добрый день. Помогите плиз решить задачу. Я с VBA столкнулся впервые 1) в строке необходимо объединить диапазон ячеек (в каждой ячейке есть данные (простой текст)) от 'A' до 'M' в одну ячейку с сохранением все данных * такой макрос я нашел в интернете (он работает с "ручным" выделением ячеек) 2) перейти на следующую строку и повторить действие из п.1 3) я знаю, что у меня таких строк допустим 550, значит необходимо выполнять эту операцию до строки 550 ...искал по форумам, анализировал, пытался составить макрос, но что-то не получается, т.к. я не знаю этого языка решил, что нужно еще один макрос (1й - это объединение ячеек в одну "MergeCell") написать, который выделяет ячейки, потом задействует макрос "MergeCell" и переходит к следующей строке

Решение задачи: «Макрос выделения диапазона ячеек-объединение их в одну-переход на след.строку-повтор пред.действия»

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

                            Sub qwert()
    Dim r
    For r = 1 To Cells(Rows.Count, 1).End(xlUp).Row
        Cells(r, 1).Resize(, 13).Select
        MergeCell  ' тут вызывайте свой макрос
    Next r
End Sub
                        