|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
12.01.2009, 09:22 | #1 |
Форумчанин
Регистрация: 17.10.2008
Сообщений: 239
|
О форматировании листов для печати!
Уважаемые господа!
При отработке программы в VBA используеться форматирование листов под формат A3 следующий образом PHP код:
Вопрос. что сделать для выполнения данного форматирования на любом компе который не имеет данного формата листа |
13.01.2009, 19:50 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Попробуйте так:
Код:
|
14.01.2009, 08:46 | #3 | |
Форумчанин
Регистрация: 17.10.2008
Сообщений: 239
|
Цитата:
ваше предложение действительно срабатывает, только есть одно маленькое, но макрос у меня работает на "сервере" и по окончанию работы макрос удаляеться, а расчитанная таблица сохраняеться в другом месте. По этой причине и возник этот вопрос Я попробовал использовать для формирования страницы квазипринтер Microsoft Office Document. все вроде получаеться, но есть маленький нюанс, который я по своей тупости не могу сделать, а именно макросом активизировать вышеназванный принтер, а по окончанию выполнения вернуть активность к принтеру HP1022. Хочу отметить что необходимо именно сделать активиным принтер Microsoft а не просто передать управление из следующих соображений. Среднее время выполнения макроса составляет от 30 минут до 3 часов (зависит от количества записей во внешней базе время обработки одного строчки таблицы составляет 4 секунды - количество строчек колеблется в разных листах от 6 до 150) а время востановления активности принетера для Excel составляет около 15 минут. |
|
14.01.2009, 15:47 | #4 | |||
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Код:
Макрорекордер как раз и запишет команду смены активного принтера. Цитата:
Вообще-то, результат выполнения запроса к БД обычно возвращает сразу много записей. Получается, уже на обработку записи Excel-ем тратится так много времени? Вообще, если тормоза не на стороне базы данных, то проблема явно в макросе. Бывает, немного неправильно написанный цикл (в то же время вполне работоспособный) 200 - 500 строк отрабатывает моментально, а потом начинает жутко тормозить. (с каждой новой строкой скорость существенно снижается, что увеличивает в сотни раз время выполнения) Прикрепите к сообщению файл с макросом - посмотрим, может, проблема в нём. Если проблема не в базе данных, вполне реально сократить время выполнения макроса до нескольких секунд. Цитата:
(имеется в виду не непосредственное подключение принтера к серверу, а только установка драйверов) Вот у меня нет принтера Kyocera Mita DP-2800Plus, однако на установку его в системе потребовалась 1 минута. И теперь мой комп уверен, что такой принтер к нему подключен (хотя у меня даже LPT-порта нет...) Выберите установку локального принтера (без автоматического поиска таковых), выберите из списка доступных принтеров любой, какой Вам понравится (чтобы только он поддерживал нужный формат), и нажмите Установить. Я не раз так делал, когда требовалось подготовить рисунки формата A2 в CorelDRAW с учётом параметров типографских принтеров. Чем не решение проблемы?
__Полезные надстройки для Excel. Парсинг сайтов и файлов.
Макросы любой сложности на заказ. Мониторинг цен конкурентов Последний раз редактировалось EducatedFool; 14.01.2009 в 15:59. |
|||
14.01.2009, 17:24 | #5 | ||||
Форумчанин
Регистрация: 17.10.2008
Сообщений: 239
|
Цитата:
Цитата:
Цитата:
Цитата:
P.S. принесли прогу автоматической замены активного принтера. Завтра буду пробовать. P.P.S. нашел программную петлю (маловероятных событий ~ 1 событие в год). Время сократил до 1 секунды. Если все это не поможет вышлю макрос, или попрошу октлючить сетевой диск на котором находиться CMD.exe. На локальном компьтере время составления общего отчета меньше 15 минут. прога будет успевать обработать все листы прежде чем измениться активность принтера |
||||
16.01.2009, 16:10 | #6 | ||
Форумчанин
Регистрация: 17.10.2008
Сообщений: 239
|
Цитата:
Общее время расчета сократилось почти в 8 раз. Но ваше Цитата:
Тема закрыта. |
||
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сравнить 2 отрицательных значения в "Условном Форматировании" | olimpus | Microsoft Office Excel | 2 | 28.10.2008 07:09 |
Макрос для сохранения листов в отдельных файлах | Neo007 | Microsoft Office Excel | 2 | 22.10.2008 18:16 |
Cравнения 2 листов | anju | Microsoft Office Excel | 8 | 08.09.2008 14:46 |
выделение листов по условию | Bronyk | Microsoft Office Excel | 5 | 11.03.2008 19:40 |
печать нескольких листов | checkbox | Microsoft Office Excel | 2 | 16.01.2008 00:50 |