Ingolder, сервис-макросы - начать запись. Выделяем диапазон и жмем печать -выделенный диапазон. Останавливаем макрос и смотрим его код
Удаляем первую строку, где пишется типа Range(A1:A5).Select. Получаем готовый код.
А вообще код вот такой:
Код:
Selection.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
