Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Отмена печати если нет данных после фильтрации
 
Спасибо
Попробовал по Вашему способу, но возможно что-то не так делаю. Так как единожды условие работает, а далее нет.  
Отмена печати если нет данных после фильтрации
 
Есть ведомость,  где по столбцу А ставиться фильтр по значениям из ячеек с листа Ряды, при отсутствии данных после фильтра по значению ячейки на печать выводится только шапка. Подскажите, как поправить, код, чтобы при отсутствии данных под шапкой ничего не выводилось на печать.
Спасибо
Получить целые числа, разделив на число повторений, Получить целые числа, разделив на число повторений и сложить по условию (формула или VBA)
 
Добрый день.

Есть файл с 3-мя листами РХ, АХ, Итог.
Необходимо на листе Итог в столбце E внести значения, которое будет равно сумме из стоблца + сумме с листа АХ разделенного на число повторений, но чтобы выходили целые числа. Из примера первого наименования, чтобы сумма 898 с листа АХ разбилась на 9 частей целыми числами.
Спасибо!
Поиск дубликатов на нескольких листах VBA, Поиск дублирующих значений на некоторых листах книги VBA
 
Добрый день.
Есть книга с номерами заказов на 3х листах в разных видах. Необходимо найти дублирующиеся значения номеров (желтый столбец) и скопировать их на Лист1.
Дубли могут быть как на одном листе так и один номер может быть на 3х листах.
Добавление листов с названием ячейки из диапазона, Создание листа и присвоение ему имени из диапазона ячеек VBA с проверкой существования такого листа
 
Спасибо!!!
Добавление листов с названием ячейки из диапазона, Создание листа и присвоение ему имени из диапазона ячеек VBA с проверкой существования такого листа
 
Уважаемые форумчане, подскажите пожалуйста в решении такой задачи.

Есть выделенный диапазоне ячеек в столбце U на листe 1111.

1) Как добавить новые листы с присвоением им имени из этого диапазона (в данном случае даты отгрузки).
2) Если лист с таким названием уже есть, то пропустить.

Спасибо.
Перенос данных с основного на листы по дате
 
Огромное спасибо!!! Все именно так!
Перенос данных с основного на листы по дате
 
Цитата
Melkior написал:
о! вот это важное замечание. с ним намного проще. сейчас сделаю
Спасибо, в ожидании
Перенос данных с основного на листы по дате
 
1) Да, между оранжевыми полосами одна дата.
2) По существующим датам в столбце L на основном листе создаются новые листы с соответствующими датами ( 06.12.2018, 07.12.2018, 11.12.2018).
Если заявки перенесены на соответствующие листы по дате, то удаляются с основного листа, т.е. разово,  по нажатию кнопки.
Перенос данных с основного на листы по дате
 
Добрый день.
Необходимо перенести данные с листа "TDSheet" на листы согласно даты загрузки по столбцу L. Если в столбце L дата 06.12.2018, то создать лист с таким названием и перенести все строки заявки включая и оранжевую с итого. Спасибо.
Копирование ячеек по листам с условием, Написание кода VBA
 
Добрый день.
Необходимо раскинуть данные с листа "TDSheet" по листам согласно даты загрузки по столбцу L. Если в столбце L дата 06.12.2018, то создать лист с таким названием и перенести все строки заявки включая и оранжевую с итого. Спасибо.
Копирование значения ячейки в пустые по столбцу до появления нового значения
 
Благодарю, все ОК. Не знаком был с таким приемом.
Копирование значения ячейки в пустые по столбцу до появления нового значения
 
Приветствую. Необходимо копировать значение ячейки в пустые ячейки по столбцу до появления в нем нового значения. При достижении нового значения в ячейке, продолжить копировать это новое значение. Не знаю на сколько понятно, но в примере, думаю, будет доступно к пониманию) Заранее благодарю.
Замена значения ячейки по условия другого столбца
 
Спасибо!!!
Замена значения ячейки по условия другого столбца
 
Добрый день.
Если значение из L столбца есть в столбце B, то значение в столбце D необходимо поменять на "нет".
По одной ячейке смог сделать, а как сделать, чтобы все значения ячеек из диапазона или столбца L.
Код
Sub Стик()
Dim iLastRow As Long
iLastRow = Cells(Rows.Count, 2).End(xlUp).Row
Range("B1:B" & iLastRow).Select
iLastRow = Selection.Rows.Count
For i = 1 To iLastRow
If Selection.Cells(i, 1) = Range("L7") Then
Selection.Cells(i, 1).Offset(, 2) = "нет"
End If
  Next
End Sub
Найти ячейку по условию и перенести данные в другую таблицу
 
Спасибо!!! То что нужно.
Найти ячейку по условию и перенести данные в другую таблицу
 
Спасибо. Все работает отлично.

А если я переношу одну из таблиц на другой лист и диапазон задаю через Application.InputBox, то какие еще нужно сделать изменения?  
Изменено: arh555 - 07.11.2016 18:44:12
Найти ячейку по условию и перенести данные в другую таблицу
 
Нашел как найти наименьшую, но больше или равной высоте: {=ИНДЕКС($E$3:$G$25;ПОИСКПОЗ(МИН(ЕСЛИ($G$3:$G$25<C4;"";$G$3:$G$25));$G$3:$G$25;0);1)}
Не получается добавить условие поиска, чтобы столбец Свободна? был пуст.
И как затянуть такую формулу в макрос?
 
Найти ячейку по условию и перенести данные в другую таблицу
 
Приветствую!
Необходимо из таблицы 2 найти наименьшую ячейку или равную высоте паллета в таблице 1, но с пустым содержанием столбца Свободна?
Далее перенести её адрес из столбца Ячейки в столбец Адрес таблицы 1. И после этого поставить в столбце Свободна? слово "нет".
И так далее до конца таблицы 1.
Надеюсь, что вполне доступно к пониманию написал.Спасибо.
Автофильтр + вывод на печть по условию
 
Всё, спасибо. Не мог с циклами разобраться, так что получалось примерно так:
Скрытый текст
Теперь понял, спасибо еще раз.
Автофильтр + вывод на печть по условию
 
Жаль, никто не поможет...
Автофильтр + вывод на печть по условию
 
Необходимо выводить согласно автофильтра по номеру паспорта, сделал запись макроса на 33 паспорта, но сильно уж громоздкий выходит. И как остановить, если в кол-во паспортов меньше 33.
Вот так  вышло при Записи макроса:
Скрытый текст
Страницы: 1
Наверх