Распечатать лист Excel из MS Access VBA на выбранном пользователем принтере - PullRequest
0 голосов
/ 23 января 2020

Я хочу напечатать лист 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, а не на принтер, выбранный пользователем из выпадающего списка. .

Пожалуйста, помогите.

Спасибо

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...