
HACER UNA PAUSA PARA VISUALIZAR LOS RESULTADOS
Publicado por Jose (1 intervención) el 27/12/2021 05:55:00
Tengo creado este ciclo para calcular los PVP dentro de un formulario continuo:
Dim Rst As DAO.Recordset
Set Rst = Me.RecordsetClone
While Not Rst.EOF
DoEvents
DoCmd.OpenForm "INTERMEDIOCALCULOCOMBINADOS" ', acNormal, , , , acHidden
DoCmd.Close acForm, "INTERMEDIOCALCULOCOMBINADOS"
Rst.MoveNext
Wend
Rst.Close
Set Rst = Nothing
Busco intercalar una PAUSA antes del DoCmd.Close acForm, "INTERMEDIOCALCULOCOMBINADOS" con el fin de ver los resultados calculados antes de ser cerrado el formulario ya que estos no me estan pasando bien al Form Principal.
Dim Rst As DAO.Recordset
Set Rst = Me.RecordsetClone
While Not Rst.EOF
DoEvents
DoCmd.OpenForm "INTERMEDIOCALCULOCOMBINADOS" ', acNormal, , , , acHidden
DoCmd.Close acForm, "INTERMEDIOCALCULOCOMBINADOS"
Rst.MoveNext
Wend
Rst.Close
Set Rst = Nothing
Busco intercalar una PAUSA antes del DoCmd.Close acForm, "INTERMEDIOCALCULOCOMBINADOS" con el fin de ver los resultados calculados antes de ser cerrado el formulario ya que estos no me estan pasando bien al Form Principal.
Valora esta pregunta


0