Спасибо!То что надо!

Добрый вечер,искал,но не смог найти подходящее.Суть проблемы в порядковом номере без повтора,как должно получится файл прилагается

Всё отлично заработало 👍спасибо Вам огромное за помощь 🤝

Согласен, сейчас сам ничего не могу понять, но кнопка обращается к макросу с названием "sub macro_01" в котором должен быть данный макрос

Сейчас это стало кнопкой риббона, там всего 3 кнопки, остальное заблокировано, оно ещё и от названия влияет 🤔

Это получается 3 кода🤔как их склеить под рибон
sub macro_01(control IRibbonControl)
End sub

Добрый день! Подскажите пожалуйста, как добавить второй лист, чтобы комировало сразу 2 листа
Set rSource = Sheets("ОДНОСТРОЧНЫЙ").Range("H13:AL27"), диапазон H13:AL27 и H61:AL75

Однострочный, судовой, график, но потом будут ещё добавлять

Так и не получается с ПДФ.Файл тяжёлый.Закинул на яндекс диск https://disk.yandex.ru/i/wJ2a0wnkUJUr7wПри добавлении листов макрос не работает  

Может быть проблема в Лист4 Который не удаляется.Если получится удалить,то как?С компа получилось прикрепить

Даже архивом, который весит 50кб, попробую через Яндекс диск

Не даёт прикрепить файл, он весит 90kb, а горит красным

Дмитрий, не получилось с телефона прикрепить файл. Может быть Лист4 мешает (не могу его удалить)

Здравствуйте, помогите пожалуйста разобраться с ошибкой, есть файл шаблон(работает отлично) оригинал только фото

А я заменил For Each vv In Array(Array(1, 15, True на False и всё норм. Но всё равно огромное спасибо Вам за помощь

Добрый день!Снова проблема 16 число не корректно переносится на другую строку,а точнее пропадает

Спасибо!Завтра на оригинале проверю и отпишусь

Последняя строка потерялась🤔

Тема была создана на http://www.excelworld.ru/forum/10-55200-1

Добрый вечер! Помогите пожалуйста доработать макрос копирования. Столкнулся с проблемой,если на чистый лист, всё копируется как надо, а в форме объединённые ячейки