ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / распечатать на одном листе
7 сообщений из 7, страница 1 из 1
распечатать на одном листе
    #37639052
ecivgamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ecivgamer
Участник
Привет всем!

Подскажите, как можно настроить область печати, чтобы результат был на одном листе.
...
Рейтинг: 0 / 0
30.01.2012, 21:47
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639053
ecivgamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ecivgamer
Участник
Excel 2010
...
Рейтинг: 0 / 0
30.01.2012, 21:49
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639060
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Руками колонки подровнять. И масштаб нужный выставить.
Причем тут VB?
...
Рейтинг: 0 / 0
30.01.2012, 21:54
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639072
ecivgamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ecivgamer
Участник
Много листиков потому что. И длина/ширина листов бывает разная, зависит от результатов вычисления данных. Так что помогите кто может с vba.
Пробую вот так вот:
Код: vbnet
1.
Sheets("Sheet1").PageSetup.PrintArea = Selection.Address


Получаю в ответ тучу страниц. Как сделать на одной?
...
Рейтинг: 0 / 0
30.01.2012, 22:03
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639078
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Вообще-то, в параметрах страницы есть масштабирование, где есть параметр "разместить на <столько-то> страниц в ширину и <столько-то> в высоту". Запишите макрос и посмотрите, какие параметры меняются...
Но не факт, что вы сможете разместить всё на одной странице - раз "туча страниц" - то как вы себе представляете вывод на один лист? шрифтом размера 1?
...
Рейтинг: 0 / 0
30.01.2012, 22:08
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639376
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
ecivgamerМного листиков потому что. И длина/ширина листов бывает разная, зависит от результатов вычисления данных. Так что помогите кто может с vba.VBA тут имеет второстепенное значение. Раз размеры разные, значит выхода два: 1) делать руками 2) сделать одну печатную форму, которая подходила бы для вывода данных любых размеров, а с помощью VBA ее можно было бы заполнять данными и печатать.

AndreTMНо не факт, что вы сможете разместить всё на одной странице - раз "туча страниц" - то как вы себе представляете вывод на один лист? шрифтом размера 1?
Имеется ввиду, что нужно отформатировать тучу страниц, а не запихнуть их на один лист.
...
Рейтинг: 0 / 0
31.01.2012, 09:15
| Ответить | Цитировать | Написать  
распечатать на одном листе
    #37639587
ecivgamer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ecivgamer
Участник
Вот что мне помогло:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Sub slgkjkg()

Sheets("12_").PageSetup.PrintArea = Selection.Address

    Application.PrintCommunication = False
    With ActiveSheet.PageSetup
        .FitToPagesWide = 1
        .FitToPagesTall = 1
    End With
    Application.PrintCommunication = True

End Sub



Всем спасибо.
...
Рейтинг: 0 / 0
31.01.2012, 11:19
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / распечатать на одном листе
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=86&tid=2158105]:
 0ms
get settings:
 10ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 51ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 364ms
total:  497ms
созд. / загр.: 497ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]