Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как сделать неактивной кнопку печати в окне предварительного просмотра / 9 сообщений из 9, страница 1 из 1
05.11.2010, 19:29
    #36939573
PSZ
PSZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
На панели инструментов и в меню получается сделать неактивной кнопку печати, а вот в окне предварительного просмотра, нет. Непонятно как обратиться к списку кнопок этого окна. Может кто подскажет.
...
Рейтинг: 0 / 0
05.11.2010, 20:31
    #36939621
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Ну так окно одно и то же:
Код: plaintext
1.
2.
3.
4.
Dim B As Office.CommandBarButton
    
    Set B = Application.CommandBars("Print Preview").FindControl( _
                Type:=msoControlButton, Id:= 2521 )
    B.Enabled = False
...
Рейтинг: 0 / 0
05.11.2010, 22:31
    #36939724
PSZ
PSZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Ругается на строчку Set B = Application.CommandBars("Print Preview").FindControl( _
Type:=msoControlButton, Id:=2521)

invalid procedure call or argument
...
Рейтинг: 0 / 0
06.11.2010, 07:20
    #36939893
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Ошибка из-за неверного имени "Print Preview".
А вообще, какую прогу обсуждаем?
Ответ был для Word 2003, но по ходу речь об Excel 2003.
...
Рейтинг: 0 / 0
06.11.2010, 07:30
    #36939895
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
А зачем надо блокировать кнопку? Всех кнопок не переловишь :)
Может лучше блокировать саму возможность печати?
...
Рейтинг: 0 / 0
06.11.2010, 09:46
    #36939927
PSZ
PSZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Да вопрос про Excel 2003. Такая возникла необходимость, долго объяснять, но смысл в том, что предварительный просмотр нужен, а вот печать из него должна быть не возможна. Пробовал отменять печать в событии BeforePrint, но тогда отменяется и вывод окна предварительного просмотра. Что-то даже прям не знаю чего придумать.
...
Рейтинг: 0 / 0
06.11.2010, 11:27
    #36939973
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
С ходу в голову приходит такой вариант. Создаем свою кнопку "Предварительный просмотр" с макросом "Макрос". При ее нажатии просмотр работает, иначе - нет. Печать не работает вообще.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private X As Boolean

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    If X Then X = False Else Cancel = True
End Sub

Public Sub Кнопка()
    X = True
    Application.Dialogs(xlDialogPrintPreview).Show
End Sub
...
Рейтинг: 0 / 0
07.11.2010, 17:28
    #36940973
vallot
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Если ты хочешь чтобы кнопки не было видно в предварительном просмотре и при печати,
просто зайди в Properties кнопки и в PrintObject поставь False!
...
Рейтинг: 0 / 0
07.11.2010, 17:36
    #36940980
vallot
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как сделать неактивной кнопку печати в окне предварительного просмотра
Эээ, что-то я не понял о чем речь, думал что кнопка на листе стоит! Не бери в голову вождь!:))
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как сделать неактивной кнопку печати в окне предварительного просмотра / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]