Я хочу напечатать лист Excel (один лист), который хранится в пути локального компьютера с помощью нажатия кнопки в форме MS Access. По некоторым деловым причинам мне нужно предоставить пользователю гибкость в выборе принтера из списка принтеров, которые настроены на его P C. Я показываю имена этих принтеров в раскрывающемся списке MS Access. Код приведен ниже: -
Private Sub Form_Load()
Dim prtLoop As Printer
cmbPrinter.RowSource = ""
For Each prtLoop In Application.Printers
With prtLoop
cmbPrinter.AddItem .DeviceName
End With
Next prtLoop
Me.cmbPrinter = Me.cmbPrinter.ItemData(0)
End Sub
Private Sub cmbPrinter_AfterUpdate()
Set Application.Printer = Application.Printers(cmbPrinter.Value)
End Sub
Private Sub cmdPrint_Click()
'wks is already set to Excel sheet which needs to be printed
wks.PrintOut
End Sub
Однако печать всегда идет на принтер по умолчанию, который уже настроен на P C, а не на принтер, выбранный пользователем из выпадающего списка. .
Пожалуйста, помогите.
Спасибо