Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Программирование, связанное с MS Office > Excel - Печать только заполненной части


Автор: Akina 27.12.2007, 15:22
Был удивлен, когда 3 не связанных между собой человека за неделю задали мне один и тот же вопрос - как напечатать только заполненную часть листа на 1 лист... а делов-то
Код

With ActiveSheet.PageSetup
  .PrintArea = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell)
  .Orientation = xlPortrait
  .FitToPagesWide = 1
  .FitToPagesTall = 1
End With

Автор: mihanik 28.12.2007, 09:11
Спасибо за то, что выложил пример.

Может пригодиться кому-нибудь...

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)