Распечатать на одном листе - VB

Узнай цену своей работы

Формулировка задачи:

Привет всем!
Подскажите, как можно настроить область печати, чтобы результат был на одном листе.

Решение задачи: «Распечатать на одном листе»

textual
Листинг программы
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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.3 из 5
Похожие ответы