Как показать текущий принтер в этикетке при запуске пользовательской формы?

Question

Я установил форму VBA, чтобы пользователь мог распечатать отчет с параметрами.Я хочу отобразить активный принтер в этой форме, используя метку.Когда я запускаю форму, на ней отображается активный принтер с текстом «принтер по умолчанию».Эта метка будет обновляться только на активном принтере, если я нажму на нее.Я не смог найти способ запустить эту метку макроса при запуске формы.

Приведенный ниже код используется для отображения активного принтера.Я знаю, что его процедура основана на опции щелчка.Есть ли лучший способ сделать это?

Private Sub CurrentPrinterLabel_Click()
    CurrentPrinterLabel.Caption = Application.ActivePrinter
End Sub

Answer 1

Поместите свой код в событие Initialize пользовательской формы:

Private Sub UserForm_Initialize()
    CurrentPrinterLabel.Caption = Application.ActivePrinter
End Sub

Кроме того, вы можете использовать событие Activate, если хотите, чтобы метка обновлялась при каждой активации формы.

Ссылки:

• Initialize Событие .

• Activate, Deactivate События .