Guardar a PDF el informe. HELP!!!
Publicado por JOSE LUIS (16 intervenciones) el 29/05/2014 16:04:54
Hola buenos dias comunidad LWP.
Espero me puedan ayudar tengo la siguiente sub, para pasar el informa a pdf, el problema es que me pasa todo los registro, y necesito que me lo guarde de uno en uno. al momento que yo le de el click. por si lo necesito o no.
Espero me puedan apoyar. gracias!
Espero me puedan ayudar tengo la siguiente sub, para pasar el informa a pdf, el problema es que me pasa todo los registro, y necesito que me lo guarde de uno en uno. al momento que yo le de el click. por si lo necesito o no.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Comando63_Click()
Dim salti As dao.DatabaseDim rstlistado As dao.RecordsetDim repo As Integer
Set salti = CurrentDbSet rstlistado = salti.OpenRecordset("listado")
rstlistado.MoveFirstrepo = rstlistado!NUM_REPO
DoCmd.OutputTo acReport, "REPORTE_DIARIO", "(*.pdf)", "k:\" & "RD-" & Format(Date, "yy") & "-SAL-" & repo & ".pdf", False, ""
End Sub
Espero me puedan apoyar. gracias!
Valora esta pregunta
0