Ver Mensaje Individual
  #4 (permalink)  
Antiguo 12/09/2010, 22:06
El_fenix
 
Fecha de Ingreso: junio-2006
Mensajes: 137
Antigüedad: 17 años, 11 meses
Puntos: 0
Respuesta: Consulta VBA.

Hola este es el procedimiento que envia las variables fecha inicio, fecha termino y numero estanque, como parametro al informe inf_recuento_fisico.

El tema es que no se como ocupar estas variables (Los valores enviados) enviadas al reporte, ya que debo poner la fecha de inicio, fin y un valor calculado en el inrome, pero no puedo capturarlas.

Cita:
Private Sub Command13_Click() 'Boton ver informe de este mes
On Error GoTo Err_Command13_Click
Dim Fini As String
Dim Fter As String
Dim Ftmp As String
Dim Fcortar() As String

Dim stDocName As String

Ftmp = Date
Fcortar = Split(Ftmp, "-")
Fini = Invertir_Fecha(Me!txtFechaIni)
Fter = Invertir_Fecha(Me!txtFechaTer)

stDocName = "INF_RECUENTO_FISICO"
DoCmd.OpenReport stDocName, acPreview, WHERECONDITION:="[FECHA] BETWEEN #" & Fini & "# AND #" & Fter & "# AND [ESTANQUE] = " & CInt(Me!cboEstanque)

Exit_Command13_Click:
Exit Sub

Err_Command13_Click:
MsgBox Err.Description
Resume Exit_Command13_Click
End Sub