масштаб

Приведенный ниже код уменьшает масштаб табличного документа так, чтобы он поместился на 1 лист, либо увеличивает масштаб для полного заполнения листа.
Для корректной работы необходимо чтобы по умолчанию был установлен текущий (рабочий) принтер.