печать диапазона ячеек

[Deceased]

Здравствуйте, помогите пожалуйста написать макрос печати выделенного диапазона ячеек.

Заранее спасибо.

[0mega]

Доброго времени суток
а чем Вас не устраивает встроенная печать по выделенному ?

[VictorM]

макрос печати выделенного диапазона ячеек.

Включаем макрорекордер, выделяем, печатаем выделенный дивпазон.
Смотрим что получилось.

Sub Макрос1()
'    Range("A1:G18").Select ' записано макрорекордером, комментируем.
    Selection.PrintOut Copies:=1, Collate:=True
End Sub

[Deceased]

спасибо!
чёрт, не додумался я макрос записать и посмотреть.
мозги себе вспарывал воркбук воркшит селекшон, принтаут...

[Deceased]

Я назначил макрос на кнопку, нарисованную на листе.
а как сделать чтобы распечатывал то, что выделено не на том листе, на котором находится кнопка?

[VictorM]

чтобы распечатывал то, что выделено не на том листе, на котором находится кнопка

В таком случае нужно будет явно указывать диапазон печати

Sheets("Лист1").Range("A1:J10").PrintOut Copies:=1, Collate:=True

Selection без активации листа не сработает.
Или активировать лист на котором находятся данные для печати, если это некритично, а потом опять переходить на лист с кнопкой.
А чтобы небыло мелькания, использовать Application.ScreenUpdating = False
Тут уже Ваш выбор что и как лучше.