Удаление ячеек из области печати

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Удаление ячеек из области печати (Макросы Sub)

qshin1980

Дата: Вторник, 08.10.2013, 16:24 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 26

Репутация: 0 ±

Замечаний: 60% ±

Excel 2010

Добрый день,

Есть следующий код:

[vba]

Код

Private Sub cmdPreview_Click()
    SetPrintStatus
    ActiveSheet.PrintPreview
End Sub

Private Sub cmdPrint_Click()
    SetPrintStatus
    ActiveSheet.PrintOut
End Sub

Private Sub SetPrintStatus()
       cmdPrint.PrintObject = False
       cmdPreview.PrintObject = False
       CommandButton3.PrintObject = False
       CommandButton5.PrintObject = False
       CommandButton6.PrintObject = False
End Sub

[/vba]

Пытаюсь аналогично в последний Sub прописать

[vba]

Код

Range("F30:AX33").PrintObject = False

[/vba]

Но что то не получается. Подскажите как правильно прописать удаление определенного диапазона из области печати!?

Спасибо!

Ответить

AndreTM

Дата: Вторник, 08.10.2013, 20:17 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1762

Репутация: 501 ±

Замечаний: 0% ±

2003 & 2010

Вы понимаете принципиальную разницу между найденным вами "кодом" (в котором отключается вывод на печать определенных объектов интерфейса - кнопочек ActiveX, расположенных на странице, и имеющих это самое свойство .PrintObject) и тем, что вы бездумно применяете "код" к объекту модели совершенно другого класса, при этом даже не осознавая, что именно вы пытаетесь сделать?

Skype: andre.tm.007
Donate: Qiwi: 9517375010

Ответить

KuklP

Дата: Среда, 09.10.2013, 02:25 | Сообщение № 3

Группа: Проверенные

Ранг: Старожил

Сообщений: 2369

Репутация: 486 ±

Замечаний: 0% ±

2003-2010

А вообще процедура SetPrintStatus бессмысленно выглядит. Один раз выделите объекты и задайте в свойствах не выводить их на печать. И оне без всякого макроса туда выводиться не будут.

И тогда и две остальные теряют смысл, ибо есть для этого уже кнопки. А чтоб не выводился диапазон на печать, тоже установите один раз ему формат ячеек ;;;. Если надо менять его режим отображения, запишите макрорекордером смену форматов.