Владимир, Спасибо большое! Всё работает "на ура"!

 V, я попробовал вставить Ваш макрос в другую книгу и таблицу, но он почему-то стал нумеровать строки снизу-вверх, начиная с адресной ячейки объекта Range("A4...
Попробовал изменить команду End(xlUp).Row на End(xlDown).Row, но он предсказуемо пронумеровал всю колонку начиная с ячейки A4. Может поможете сделать этот макрос универсальным?
Спасибо!

V, Вы волшебник! Это то, что надо! Спасибо огромное! Как я понимаю, в теле кода можно прописывать адрес ячейки начала счета - вместо А4 например А34, в зависимости от нахождения начальной строки.
Вот если бы этот код можно было бы оформить в качестве надстройки для Library, чтобы при необходимости использовать в любой книге Excel, с любой ячейки, ему бы просто не было цены!
Но всё равно, Спасибо Вам большое!!!

Владимир, разобрался, но макрос банально нумерует все строки, а надо, чтобы нумеровал одну объединённую строку.

Количество поставщиков всегда будет меняться, диапазон А1:А15 не фиксированный т.к. строки всегда будут добавляться

Здравствуйте, уважаемые форумчане!
Возникла задача. Есть некоторая таблица (прилагаю файл). В таблице надо автоматически проставить номер по порядку (колонка "А"). Загвоздка в том, что ячейки в этих колонках объеденены. Причём разнокалиберно. Т.е. строка состоит из объединённых строк. И таких строк предполагается очень много.
Есть какие-либо идеи?
Спасибо.