amigos uma pequena duvida
eu uso este codigo para impressão:
If MsgBox("Deseja imprimir o documento?", vbYesNo, "Resumo Diario") = vbYes Then
DoCmd.OpenReport "RESUMO_TESTE", acViewNormal, "", "data = [forms]![RESUMO_DIARIO]![DATA]", acNormal
Else: Exit Sub
End If
é possivel acrescentar mais codigo de forma ao clicar no botão para imprimir ele perguntar qual a impressora a utilizar e o numero de copias a imprimir?
eu uso este codigo para impressão:
If MsgBox("Deseja imprimir o documento?", vbYesNo, "Resumo Diario") = vbYes Then
DoCmd.OpenReport "RESUMO_TESTE", acViewNormal, "", "data = [forms]![RESUMO_DIARIO]![DATA]", acNormal
Else: Exit Sub
End If
é possivel acrescentar mais codigo de forma ao clicar no botão para imprimir ele perguntar qual a impressora a utilizar e o numero de copias a imprimir?