Вывод на печать строк по условию

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Вывод на печать строк по условию (Макросы/Sub)

Литр

Дата: Пятница, 23.01.2026, 16:23 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 21

Репутация: 0 ±

Замечаний: 0% ±

2013

Доброго дня.
Нужен код макроса который бы выводил на печать следующее содержание большой таблицы:
- сквозные строки 1:9
а также:
диапазон ячеек по следующему условию:
в столбце "А" находятся даты часть из которых =сегодня(). Так вот эти строки в диапазоне столбцов А:АВ

К сожалению не могу прицепить файл. Политика организации не позволяет((
Только кусочек скрина
По скрину на печать кроме сквозных строк 1:9 необходимо вывести диапазон А14:АВ20

К сообщению приложен файл: 4476770.jpg (67.3 Kb)

Ответить

and_evg

Дата: Суббота, 24.01.2026, 10:36 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 496

Репутация: 100 ±

Замечаний: 0% ±

Excel 2007

Доброе ...
Так зачем макрос? Диапазон печати - на весь лист, фильтруем по столбцу А и на печать...

Ответить

Литр

Дата: Четверг, 29.01.2026, 14:39 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 21

Репутация: 0 ±

Замечаний: 0% ±

2013

and_evg,
Не так просто как кажется.
Уточняю условия проблемы: подлежат печати несколько сотен строк отвечающих условию: все строки в которых дата в столбце "А" = Сегодня() - вывести на печать диапазон A:AB

Ответить

_Boroda_

Дата: Четверг, 29.01.2026, 14:55 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 17001

Репутация: 6667 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Так про то и речь - поставьте фильтр на сегодняшнюю дату и печатайте

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

msi2102

Дата: Четверг, 29.01.2026, 14:58 | Сообщение № 5

Группа: Проверенные

Ранг: Обитатель

Сообщений: 471

Репутация: 140 ±

Замечаний: 0% ±

Excel 2019

Цитата _Boroda_, 29.01.2026 в 14:55, в сообщении № 4 (

)

Так про то и речь - поставьте фильтр на сегодняшнюю дату и печатайте

ТУТ без ЛИТРА не разобраться

Ответить

Литр

Дата: Четверг, 29.01.2026, 16:04 | Сообщение № 6

Группа: Пользователи

Ранг: Новичок

Сообщений: 21

Репутация: 0 ±

Замечаний: 0% ±

2013

_Boroda_,
-Клик на фильтр
-Клик на убрать все даты
-Скрол до нужной даты (а если там несколько лет?)
- Клик по нужной дате (сегодня)
- ctrl+P
- enter
а почему бы не сделать все это одним единственным кликом по кнопке с макросом?

Ответить

_Boroda_

Дата: Четверг, 29.01.2026, 16:07 | Сообщение № 7

Группа: Админы

Ранг: Местный житель

Сообщений: 17001

Репутация: 6667 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Цитата Литр, 29.01.2026 в 16:04, в сообщении № 6 (

)

-Скрол до нужной даты (а если там несколько лет?)

Отсюда делаю вывод, что там не даты, а текст. Иначе в фильтре была бы автогруппировка. И тот макрос, который бы написали, не сработал бы. Вот поэтому и нужен пример файла

Ответить

Вывод на печать строк по условию (Макросы/Sub)

Страница 1 из 1
1