El último argumento al abrir un formulario permite pasar parámetros:
DoCmd.OpenForm "Certificados_Revision", acNormal, , , , , "M"
Luego en la apertura del formulario:
Private Sub Form_Open(Cancel As Integer)
If Me.OpenArgs = "M" Then
MsgBox Me.OpenArgs
Else
No hay comentarios:
Publicar un comentario