Страницы: 1
RSS
Проблема при печати UserForm методом Me.PrintForm
 
Добрый день! На контрол формы повешен вывод на печать:
Код
Private Sub lb_B_print_Click()
Me.PrintForm
End Sub

Выяснилось, что у некоторых пользователей вместо печати появляется диалоговое окно с предложением сохранить форму, сохранение происходит в неизвестном пользователю формате, после чего программа вылетает. Подскажите, в чем может быть причина - сетевые настройки принтера или что-то в этом роде?
 
вместо ME. указывайте явно наименование формы
Современные языки программирования обязаны иметь встроенный метод ChuckNorris(),
который возвращает нужные тебе данные из любого объекта, даже если их там нет...
 
Не помогло. Подскажите, возможно ли и как предотвратить вылет программы при подобной ошибке вывода на печать? Например, если по нажатию на контрол "печать" идет ошибка - выводить MsgBox "Сделайте скриншот и распечатайте из word", если  ошибки нет - вывод на печать.
 
Код
Private Sub lb_B_print_Click() 
On Error GoTo ErrHandler:

Me.PrintForm 

Exit Sub
    
ErrHandler:
    If Err <> 0 Then MsgBox "Сделайте скриншот и распечатайте из word.", 48, "Ошибка"
    

End Sub
Учимся сами и помогаем другим...
 
ber$erk, спасибо!
 
.
Изменено: Vitaliy P - 24.01.2017 14:53:22 (А вот после изменения названия темы модератором, вопрос уже к ней не относится)
Страницы: 1
Наверх