Si nos encontramos en un Formulario cualquiera,
y queremos pasar al detalle de otro dato,
por ejemplo, en un almacen, estamos en el (formulario precios)
y tenemos el precio de un producto X, luego queremos ver los detalles del producto,
con un doble clic del raton, podemos pasar a otro formulario (formulario productos) para ver los detalles del producto X
y asi podemos ir de formulario en formulario solo pinchan doble clic:
'Primero definimos una variable:
Dim CONSU As String '[variable CONSU para darle un valor cualquiera]
CONSU = NombreProducto'[se asigna un valor de una celda del formulario la cual tiene el dato]
'el nombre en la celda del formulario en que se contiene el dato se llama, en este caso NombreProducto
'paso siguiente es abrir el formulario con el dato almacenado en la variable CONSU
'2 formas
'1 cuando el dato es valor cualquiera:
DoCmd.OpenForm "formulario productos", acNormal, , "(" & "[MMM] =" & """" & CONSU & """" & ")"
'aqui se abre el formulario formulario productos y se filtra por el valor MMM
'MMM en este caso es el nombre de la celda del formulario proctos que contiene el nombre del procto
'2 cuando el dato es un indice principal de la tabla:
DoCmd.OpenForm "formulario productos", acFormDS, , "(" & "[formulario productos].[MMM] =" & """" & CONSU & """" & ")", acFormPropertySettings, acIcon
Entonces:
Dim CONSU As String
CONSU = NombreProducto
DoCmd.OpenForm "formulario productos", acNormal, , "(" & "[MMM] =" & """" & CONSU & """" & ")"
o
Dim CONSU As String
CONSU = NombreProducto
DoCmd.OpenForm "formulario productos", acFormDS, , "(" & "[formulario productos].[MMM] =" & """" & CONSU & """" & ")", acFormPropertySettings, acIcon
Dim CONSU As String
CONSU = Material
DoCmd.OpenForm "MaterialesF", acNormal, , "(" & "Material =" & """" & CONSU & """" & ")"
existen varias formas mas pero estas son muy utiles, antes por supuesto
deben tener los formularios correctamente creados con los datos correctos tambien.
