Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Перевернуть страницу
 
#1
06.02.2013 12:27:55
Дорогие специалисты скажите пожалуйста есть ли возможность чтобы в одном листе 1страница располагалась в книжном а 2страница альбомном формате
 
 
 
#2
06.02.2013 13:08:33
В Excel - нет.
 
 
 
#3
06.02.2013 13:31:17
Жалко в Word такая возможность есть
 
 
 
#4
06.02.2013 14:30:37
Михаил, чисто теоретический вопрос, а разве нельзя макросом прописать "если активен лист 1 - формат такой, если лист 2- формат сякой"?
 
 
 
#5
06.02.2013 14:45:21
Разговор про один лист
 
 
 
#6
06.02.2013 14:55:01
Цитата
andreika21 пишет:
в одном листе 1страница располагалась в книжном а 2страница альбомном формате

Само расположение нет, однако если необходимо только для печати, то можно что-нибудь придумать... например печать по кнопке, которая макросом задает диапозоны печати и печатает каждый диапазон по отдельности  О_о
 
 
 
#7
06.02.2013 16:51:11
Спасибо за ответы с макросом совсем не знаком будем делать на двух листах что очень не удобно
 
 
 
#8
06.02.2013 19:23:37
хотелось бы посмотреть
--на заполняемость страниц
-сложность

для анализа на перевод в ворд
 
 
 
#9
07.02.2013 09:35:13
образец печати
 
 
 
#10
07.02.2013 16:55:19
в ворде будут проблемы файлом будут пользоваться люди не совсем дружащие с компом
 
 
 
#11
07.02.2013 17:12:54
нажать кнопку печать смогут люди ,
Цитата
не совсем дружащие с компом
 
 
 
#12
08.02.2013 10:20:13
Там не только печатать а и вводить данные надо, не раз был свидетелем как чайники комп заламывали спасибо что ответили
 
 
 
#13
08.02.2013 10:47:30
А как насчет выложить пример файла, что бы было понятно какие области и как должны выводиться на печать...

или поиграйтесь вот с этим:
Код
'Диапозон который будет выведен на печать в книжном варианте
    With ActiveSheet.PageSetup
        .PrintArea = "$A$1:$G$16"
        .Orientation = xlLandscape
    End With
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
    'Диапозон который будет выведен на печать в альбомном варианте
    With ActiveSheet.PageSetup
        .PrintArea = "$A$17:$K$32"
        .Orientation = xlPortrait
    End With
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
Изменено: SkyShark - 08.02.2013 11:47:45
 
 
 
Страницы: 1
Читают тему
Наверх