Спасибо, все работает)

Добрый день.
да получилось,спасибо
вопрос закрыт

Всем доброго дня.
Возникла проблема с макросом. Есть макрос, который из одной вкладки переносил магазины в другой. Потом потребовалось, чтобы суммирование ячеек в столбце F продлевалось до первого нулевого значения.
Dim i&
i = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Rows(1).Row - 1
Selection.AutoFill Destination:=Range("F3:F" & i), Type:=xlFillDefault

Но пишет ошибку duplicate declaration in current scope.
Как избежать этой ошибки чтобы считалась сумма до первой нулевой ячейки?
Заранее спасибо

Спасибо Дмитрий
но не помогает. Всё равно вылетает((((  

ну по ходу нет. НО,почему тогда при удалении в ручном режиме листов Excel выкидывает? У других все нормально. Значит в моём компе или в excele что-то не так.
Но что? Просто банальное удаление листа уже выкидывает.  

так я выложил удалив Active X и запустил, она не работает.
Может дело в компьютере моём? Поэтому я же выложил видео.
В файле есть макрос  
еще раз вложил.
Прошу прощения если что не так.  

А если они нужны в разбивке
Я удалил вообще эту вкладку, но она все равно вылетает. Может дело в другом?  

При удалении вкладок возникает проблема

Прошу прощения
во вложении
 

Добрый день.
таблица по ссылке: https://yadi.sk/d/mmVG7IWrcIXhzQ
макрос до этого работал
работало даже удаление вкладок

Всем привет.
Кто-то может объяснить что случилось. Включил комп и выполнял ту же функцию в Excel (а именно макросы и удаление лишних вкладок).
Раньше работал макрос, спокойно удалял вкладки. А сейчас виснет и вылетает.
Переустановил программу, все равно вылетает.
Может кто-то сталкивался?
видео по ссылке: https://yadi.sk/i/XXFdbiKP3UY7_Q

Всем доброго дня.
Возник вопрос: как свести несколько вкладок с разными видами таблиц в одну вкладку "статистика". Условно есть несколько вкладок таблицы А (выделено оранжевым) и несколько вкладок таблицы Б (выделено зеленым).
Как собрать воедино данные таблицы А и Б ??? Функция "Суммеслимн" не помогает((((
Возможно ли такое вообще?
Заранее спасибо

Ігор Гончаренко, Вы гений.
спасибо

Добрый день.
Есть выпадающий список в Active X (столбец В). Как сделать так, чтобы когда ставишь галочку (столбец Е), автоматически заполнились все выпадающие списки.
Такое вообще возможно?
Таблица во вложении.

Интересно, спасибо Вам

Спасибо большое Вам
а что этот макрос собственно говоря делает? отделяет ячейки от изображения?

Всем привет
Возникла странная проблема.
Есть штрих-коды в ячейках. Штрих код сейчас очень близко друг к другую маркировку не порезать. Начинаю увеличивать высоту строк или ширину столбцов, но штрих-код увеличивается вместе с увеличением строк или столбцов. Каждый штрих-код вручную очень долго. Может есть универсальный вариант?
спасибо заранее

@buchlotnik спасибо
гениально

Всем привет
возникла проблема с маркировкой в Excel
суть: Из вкладки "Таблица отгрузок" переместить во вкладку "Маркировка" так, чтобы транспонировала по порядку как в примере.
Просто бывает делать вручную когда в вкладке "Таблица отгрузок" может быть больше 100 шт и т.д.
Есть ли универсальное средство?
спасибо

Спасибо большое. Вы гений

Вы писали:А если магазинов штук 10 допустим, продолжать писать столбцы с AND вплоть до 10 столбцов?
Или есть упрощенный вариант?

спасибо

Всем привет
Возникла трудность при переносе строк с некоторыми условиями.
Магазин заказывает тиражи и заносится в общую таблицу.
1) Есть таблица (2 листа: новые и старые магазины)
2) Есть столбцы (Дивизион, Тип материала и т.д.)
3) Есть тиражи (количество для каждого магазина)

Можно ли с помощью макроса сделать перенос из листа "Новые магазина" на "Старые магазины" только те строки, где присутствует тираж на Московские (КОлумбус и Манеж)?

Таблица во вложении (Тиражи). Строк с количеством для магазинов может быть и более 100
Я создал макрос, чтобы удалить и добавить строки (удалить Столбцы СПБ или МСК в зависимости для какого города составляем тиражи)
Появляются пустые строки тиражей, их надо удалить и строки с тиражами перенести.
Возможно такое?

Пример МСК и СПБ Во вложении. Оранжевым выделены те строки, которые надо удалить, так как там нет количества

спасибо заранее всем

Добрый день.
А Вы не подскажете
как при защищенном листе дать возможность вставлять изображения?
Например даю разрешение на изменение высоту строк и ширину
а как бы с изображением?
Есть код:
Sheets("Лист1").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
                                      , AllowFormattingCells:=True, AllowFormattingColumns:=True, _
                                        AllowFormattingRows:=True, Password:="1111"

спсибо

Однако в таблице макроса не увидел))))

Нет, у @Hugo получилось по другому
То есть выбирается этаж допустим 1, в проверке данных стоят автоматически: Зона1A;Зона1B;Зона1С;Зона1D;Зона1E;Зона1F
Стоит выбрать в этой же ячейке 2-ой этаж, в проверке данных уже другие значения: Зона2A;Зона2B;Зона2C;Зона2D;Зона2E

как?

Спасибо большое
Но как у Вас получилось что при выборе этажа выходят верная зона и верное место?
Посмотрел в проверке данных не нашел связи(
спасибо

спасибо большое
+все равно выпадающий список показывает пустые или одинаковые строки

не получается, все равно остается также

Всем добрый день.
нужна маленькая помощь.
1) как сделать выпадающие списки с несколькими значениями?
к примеру (во вложении)
на 1-ом этаже есть 6 зон (А, B,C,D,F,E) и в каждой зоне может быть 1-3 места. Как сделать выпадающие списки связанные друг с другом. Проблема уже возникла в третьем столбце. КАк связать третий столбец с Этажом и Зонами а далее и с ценой связать?
2) При объединении ячеек выпадающий список идет не целым списком, а с пустыми строками. МОжно ли сделать так, чтобы они были без пустых строк (этаж1, этаж2, и этаж 3 и т.д.)

спасибо всем заранее

всем спасибо
да Ечисло не надо. ПРосто фишка в том, чтобы заказчик мог при ввнесении случайно текста начала окрашиваться. спасибо Вам большое @ocet p И @БМВ

Спасибо, но это касается одной ячейки, а нужно то для нескольких ячеек))
всё равно спасибо