Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

11 Август 2022, 02:19 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Здесь можно поблагодарить участников форума Улыбка
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: Где в LibreOffice Calc галочка “Черно-белая печать”? В Excel так  (Прочитано 606 раз)
0 Пользователей и 1 Гость смотрят эту тему.
ForumOOo (бот)

Offline Offline

Сообщений: 819


« Стартовое сообщение: 18 Июль 2022, 17:43 »

Компонент: Calc
Версия продукта: 7.x
Сборка: Version: 7.3.4.2 (x64) / LibreOffice Community Build ID: 728fec16bd5f605073805c3c9e7c4212a0120dc5 CPU threads: 6; OS: Windows 10.0 Build 18363; UI render: Skia/Raster; VCL: win Locale: ru-RU (ru_RU); UI: ru-RU Calc: CL
ОС: Astra Linux

Где в LibreOffice Calc галочка “Черно-белая печать”? В Excel такая есть, она позволяет не выводить на печать заливку ячеек.
Если такой функции нет, то подскажите, как в VBA LibreOffice Calc реализовать это с помощью макроса?

--
Подпись: Василий Курышев
Эл. почта: kuryshev.vasya92@mail.ru
Записан
mikekaganski
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Хабаровск -> Москва
Сообщений: 2 809


« Ответ #1: 18 Июль 2022, 18:12 »

tdf#90669
https://ask.libreoffice.org/t/libreoffice-calc-printing-cell-data-in-black-and-white-only/27157/6
« Последнее редактирование: 18 Июль 2022, 18:16 от mikekaganski » Записан

С уважением,
Михаил Каганский
sokol92
Мастер
*****
Offline Offline

Пол: Мужской
Сообщений: 976


WWW
« Ответ #2: 18 Июль 2022, 20:39 »

Для справки: в Excel за черно-белую печать отвечает свойство PageSetup.BlackAndWhite.

Метод, предложенный @Lupp (вторая ссылка в ответе Михаила) удалит все форматирование, включая границы ячеек, стили шрифтов и т.п., а не только цветовое оформление.
Для удаления цвета ячеек и цвета шрифтов (прямое, не условное форматирование) можно использовать конструкцию вида:
Код:
Sub Test
  Dim oSheet
  oSheet=ThisComponent.Sheets(0)
  oSheet.CellBackColor=-1
  oSheet.CharColor=-1
End Sub

Еще вспомнил: Menu / Options / Print / Defaults. Птичка "Convert colors to grayscale" позволяет печатать в оттенках серого (не то же самое, что черно-белая печать).
В русском интерфейсе: Меню / Сервис / Параметры / Печать / По умолчанию. "Преобразовать цвета в оттенки серого".
« Последнее редактирование: 18 Июль 2022, 21:12 от sokol92 » Записан

Владимир.
Vasiliy Kuryshev
Новичок
*
Offline Offline

Сообщений: 1


« Ответ #3: 20 Июль 2022, 18:27 »

Всем спасибо за ответы  Улыбка. Последний макрос работает.
Я думаю переделать его так, чтобы он сначала запоминал форматирование, затем убирал форматирование, печатал активный лист, а потом возвращал форматирование ячеек обратно.
Таким образом я смогу добиться того же, что делает кнопка "Чёрно-белая печать" в Excel.
Записан
sokol92
Мастер
*****
Offline Offline

Пол: Мужской
Сообщений: 976


WWW
« Ответ #4: 20 Июль 2022, 18:45 »

Я думаю переделать его так, чтобы он сначала запоминал форматирование, затем убирал форматирование, печатал активный лист, а потом возвращал форматирование ячеек обратно.
Альтернатива (макрос): скопировать лист в конец документа, подготовить к печати, отпечатать, удалить.
Записан

Владимир.
economist
Форумчанин
***
Offline Offline

Сообщений: 1 718


« Ответ #5: 20 Июль 2022, 19:31 »

Можно макросом сохранить документ, снести формат и напечатать, перезагрузить документ (т.е. восстановить). Это позволит не париться по поводу разрыва связей формул и диапазонов.
Записан

Руб. за сто, что Питоньяк
Любит водку и коньяк!
Потому что мне, без оных, -
Не понять его никак...
mikekaganski
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Хабаровск -> Москва
Сообщений: 2 809


« Ответ #6: 21 Июль 2022, 08:30 »

макросом сохранить документ, снести формат и напечатать, перезагрузить документ (т.е. восстановить)

Теоретически правильнее создать контекст отмены, в нём произвести все изменения, распечатать и откатитьочистить стек redo). Правда, практически есть баги с отменой Грустный - надо смотреть, корректно ли отменяются изменения, производимые макросом.

Но в любом случае - сохранение документа при распечатке крайне опасно, пользователь может быть весьма "благодарен", когда выяснит, что его документ перезаписан временными изменениями, которые он делал только для распечатки.
« Последнее редактирование: 21 Июль 2022, 08:32 от mikekaganski » Записан

С уважением,
Михаил Каганский
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!