Bom dia feras.
Tenho um botão que imprime um relatório feito no access e salvo como docx.
Porém só estou conseguindo imprimir 1 cópia por vez e gostaria, de acordo com o relatórios, que imprimisse em x vias.
Uso este código para a impressão e não consegui colocar alguma linha para fazer a impressão em mais de uma via:
Alguma luz?
Abrasss!!!
Tenho um botão que imprime um relatório feito no access e salvo como docx.
Porém só estou conseguindo imprimir 1 cópia por vez e gostaria, de acordo com o relatórios, que imprimisse em x vias.
Uso este código para a impressão e não consegui colocar alguma linha para fazer a impressão em mais de uma via:
- Código:
imprime = MsgBox("Confirma a impressão do Memorando " & Me.txtNumMemo.Value & "?", vbQuestion + vbYesNo, "Imprimir")
Select Case imprime
Case vbYes
Set oApp = CreateObject("Word.Application")
With oApp
.Documents.Open strLocal
.ActiveDocument.PrintOut
.ActiveDocument.SaveAs strLocal
.ActiveDocument.Close
End With
oApp.Quit
Set oApp = Nothing
Case vbNo
DoCmd.CancelEvent
MsgBox "Impressão Cancelada !", vbInformation, "Informando..."
End Select
Alguma luz?
Abrasss!!!